r - 評価されたパラメーター名を使用した Knitr echo 関数呼び出し

Question

以前に定義した場合

n <- 200   
maf <- .2 

エコーする方法はありますか

snp <- rbinom(n,2,maf)

次のように表示されます

snp <- rbinom(200,2,.2)

結果の Knitr ドキュメントで。

Answer 1

substitute次のように使用できます。

```{r ,echo=FALSE}
 substitute(snp <- rbinom(n,2,maf),list(n=n,maf=maf))
 rbinom(n,2,maf)
```

## snp <- rbinom(200, 2, 0.2)
##   [1] 0 0 1 1 1 1 0 0 0 0 0 0 0 1 1 0 0 0 0 1 0 0 0 0 0 2 0 1 1 2 1 0 0 0 0
##  [36] 1 0 0 1 0 0 0 0 0 1 0 0 1 0 0 1 1 1 0 0 0 1 0 0 0 0 0 0 0 0 1 1 0 0 1
##  [71] 0 1 0 0 0 0 0 1 0 1 0 1 1 0 0 1 0 1 0 0 1 0 1 1 1 2 0 1 0 1 1 0 1 0 0
## [106] 1 1 0 1 1 1 0 0 1 0 0 0 0 0 0 1 1 0 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0
## [141] 1 0 0 1 0 0 1 0 2 0 0 0 1 0 0 0 1 1 0 0 0 0 0 2 1 1 2 0 1 0 0 0 0 0 1
## [176] 0 0 2 0 1 1 0 0 0 0 0 1 0 1 2 0 1 1 2 0 0 1 1 1 0