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