[英]how to pass a variable to lm within a function in R
這是一個(非)工作的例子,說明我想做什么。 限制是所有這一切都必須在一個函數內發生,並且K
不應該附加到x
。 這樣做的正確方法是什么? 問題是K
與此處的正確環境無關。
編輯:基於以下評論。 提供的答案有效,但我們仍然不明白為什么
f = function() { K=5; x = data.frame(a=1:10, b=(1:10)^2);
regstr = "b ~ a:I(a>K)";
lm(regstr, data=x);
}
f()
Error in unique(c("AsIs", oldClass(x))) (from #3) : object 'K' not found
> sessionInfo()
R version 2.15.2 (2012-10-26)
Platform: x86_64-unknown-linux-gnu (64-bit)
locale:
[1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
[3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8
[5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8
[7] LC_PAPER=C LC_NAME=C
[9] LC_ADDRESS=C LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
attached base packages:
[1] stats graphics grDevices utils datasets methods base
f = function() { K=5; x = data.frame(a=1:10, b=(1:10)^2);
regstr = "b ~ a:I(a>K)";
lm(as.formula(regstr), data=x);
}
你錯過了
as.formula
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.