无法使用rgp

时间:2016-08-18 03:14:53

标签: r

我有这个简单的代码:

library(rgp)
df1 <- data.frame(x=1:10, y=sin(1:10))
grp.model <- symbolicRegression(y ~ x, df1, functionSet=functionSet("sin"))

当我执行时,我收到错误

STARTING genetic programming evolution run (Age/Fitness/Complexity Pareto GP search-heuristic) ...
Error in mse(x, y) : Argument 's_y' is not a real vector.

我尝试了https://cran.r-project.org/web/packages/rgp/vignettes/rgp_introduction.pdf中的示例,但所有示例都给了我无意义的常量函数。

我做错了什么?

我正在使用R版本3.1.2和rgp_0.4-1。

干杯。

1 个答案:

答案 0 :(得分:6)

我也得到同样的错误。错误输出函数mse的文档声明它的参数需要“数字向量或列表”。

运行str命令查看数据框的结构表明x是整数类型。

> str(df1)
'data.frame':   10 obs. of  2 variables:
 $ x: int  1 2 3 4 5 6 7 8 9 10
 $ y: num  0.841 0.909 0.141 -0.757 -0.959 ...

尝试在x vector上使用as.numeric():

library(rgp)
df1 <- data.frame(x=as.numeric(1:10), y=sin(1:10))
grp.model <- symbolicRegression(y ~ x, df1, functionSet=functionSet("sin"))