我有一个要添加列的tibble。tibble可以是任意长度n,其中它是三个变量的结果: x <- 1:5 # can be any sequence lengthdata_length<- length(x)
h <- 3L # can be any integer 该函数将接受上述内容,并输出一个45长的tibble:data_length * u * h 现在我还有一个由nt<- seq(from = 1, to = length(x) + 1 -
我试图采用一个与经验数据相吻合的线性模型,例如:x <- seq(from = 0, to = 1, by = .01)model<- (lm(y ~ x))# R^2 is .6208
现在,我想要做的是使用predict函数(或类似的东西)从x创建一个向量y,该向量的预测值与x和y之间的原始关系的误差相同y2 <- p