r - 如何使用R从符号回归中获得函数结果

Question

首先，请原谅我的无知，因为我今天刚刚开始学习 R。

我有一个包含两个变量 (x, y) 的数据框，如下所示:(1,0), (2,26), (3,88), (4,186), (5,320), (6,490), (7,541) .我想用符号回归找到一个函数 f使得 y = f(x) .

跟着教程here ，我可以有一个情节f(x) ，这接近于我的期望。但是，我不知道如何打印出函数 f(x) .

我尝试使用另一个名为 Eurequa 的工具。它非常易于使用，并为我提供了(很多)功能。但是我不能在我的项目中使用商业工具。谢谢你。

更新

这是我计算符号回归并绘制函数的代码。我在R环境中一一输入命令。

x = c (1, 2, 3, 4, 5, 6, 7)
y = c (0, 26, 88, 186, 320, 490, 541)
data1 = data.frame(x,y)
newFuncSet <- functionSet("+","-","*")
result1 <- symbolicRegression(y ~ x, data = data1, functionSet = newFuncSet, stopCondition = makeStepsStopCondition(2000))
plot(data1$y, col=1, type="l"); points(predict(result1, newdata = data1), col=2, type="l")

Answer 1

model <- result1$population[[which.min(result1$fitnessValues)]]rgp 简介可以找到包含许多示例的包 here.