2

うまくいけば、これはそれほど複雑ではないはずです....しかし、私は次の文字列を持っており、x入力できるように関数としてプログラムで供給されるようにしたいと思います

HW.R()

100個のランダムな法線を生成するには....つまり、それを実行するにはどのような操作を実行する必要がありますxか？

以下は生成するコードですx

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

1 に答える 1

7

ご想像のとおり、それほど複雑ではありません。これで作業が完了します。

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

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

または、最初に：で「ラップ」するsource()限り、を使用できます。xtextConnection

source(file = textConnection(x))
length(HW.R())
# [1] 100
于 2012-11-01T06:08:32.093 に答える