我在不同时刻记录了值,并使用approx()函数在这些点内完成了线性插值。我在"模型1"中获得了预测值。对象(请参阅下面的脚本),但我无法找到如何从对象中提取那些x,y预测值。任何帮助将非常感激。
这是脚本。
x <- c(7,56,64,71,84,92,98,106,118,140,148) # observed data
y <-c(0,1,1,1,1,1,1,1,0.891038658,0.727258549,0) # observed data
par(mfrow = c(1,1))
plot(x, y, main = "approx(.)")
points(approx(x, y, method = "linear"), col = 4, pch = "*")
Model1<-approx(x, y, method="linear", xout=7:148, yleft=0, yright=0, rule = 1, f = 0, ties = mean)
提前致谢,
何
答案 0 :(得分:0)
approx
是一个简单的函数,没有复杂的返回。它给出了一个包含两个变量的列表:x
(取自xout
中的approx
)和y
(插值)。
您可以使用Model1$x
和Model1$y
来访问两个向量。如果你想要一个数据框,正如@ eipi10所说,做:
as.data.frame(Model1)
使用泛型函数as.data.frame
的“list”方法。