[R字符串採購

Question

希望這不應該太複雜....但我有以下字符串中x，並希望它以編程來源的功能，這樣我可以鍵入

HW.R() 

生成100個隨機法線....即我需要在x上執行哪些操作才能發生？

下面

是產生x

require(RCurl) 
x <- base64Decode("SFcuUiA8LSBmdW5jdGlvbigpewogIHJub3JtKDEwMCkKfQ==\n") 
x 
[1] "HW.R <- function(){\n rnorm(100)\n}" 

Answer 1

正如你所料想的代碼，它不是在所有複雜。這應該完成這項工作：

x <- "HW.R <- function(){\n rnorm(100)\n}" 
eval(parse(text = x)) 

HW.R 
# function(){ 
# rnorm(100) 
# } 

或者，你可以使用source()，只要你先在textConnection「包裝」 x：

source(file = textConnection(x)) 
length(HW.R()) 
# [1] 100