2013-06-27 3 views
6

Если я ранее определенKnitr эхо вызова функции оцифрованных параметров имена

n <- 200 
maf <- .2 

Есть ли способ, чтобы эхо

snp <- rbinom(n,2,maf) 

таким образом, что она показывает, как

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

в итоговый документ.

+0

будет 'кошка (paste0 ("SNP <-rbinom (" п " 2", МАФ, ")"))' это сделать? –

+0

Было бы неплохо, если бы был способ решить проблему в целом. Я надеюсь, что есть какой-то параметр/hook, который может использовать knitr, сначала оценивать параметры, а затем эхо-функцию с оцененными именами параметров. – rdelbel

ответ

2

Вы можете использовать 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 
+0

Это была моя мысль с 'cat' и' paste0', но это еще лучше, но все же не совсем то, что OP, кажется, после. Это может быть лучшее, что он получит. +1 –

+0

@TylerRinker Я думаю, что лучше всего обернуть 'subscribe' и использовать' match.call' перед этим, чтобы динамически создать список окружения ... – agstudy