如何把自定义的函数求出的值保存到一个文件当中呢？

zoechenlincy

如何把自定义的函数求出的值保存到一个文件当中呢？for(i in 1:length(66772674))  z=function(i){
  z=(d[i]-pf[i])/vf[i]
  return(z)
}

write.table(z,file="zizi",append = FALSE,quote = TRUE,sep = "  ",eol = "\n",na="NA",dec=".",row.names = TRUE,col.names=TRUE,qmethod=c("escape",'double'))
一直出现这样的错误：
Error in as.data.frame.default(x[[i]], optional = TRUE) :
  cannot coerce class ""function"" to a data.frame


怎么办呢？

chunfei_xu

for(i in 1:length(66772674))  z=function(i){
   z=(d[i]-pf[i])/vf[i]
   return(z)
}
上述语句不是定义一个函数，而是使用FOR 循环执行Z函数66772674次，应该说Z是一个局部变量，而不是一个函数，所以不可能运行成功。

zoechenlincy

那要怎么办才能存储 z 的数据呢

chunfei_xu

你可以把完整的问题说一下，从代码里看不出你的意图。length(66772674)的结果是1，所以你的FOR循环根本就没起作用。如果是想从1到66772674的范围内得到每个I的对应计算结果，代码应该写成for i in 1:66772674{}才对。