我在R中编写此代码,以从我的diff函数生成一个csv文件,但是出现了这个错误。
for(girdi1 in 1:304) {
print(girdi1)
meslek1<-diff(as.data.frame(amges[,girdi1])[,1], lag=1, differences=1)
asd <- rbind(meslek1,asd)
}
write.csv(asd, file='asd.csv')
答案 0 :(得分:0)
您的asd
对象不存在,您必须首先将其创建为循环外部的空对象。
要在绑定时更改行的顺序,请在rbind()
a <- c(1,2,3)
b <- c(2,3,4)
> rbind(a,b)
[,1] [,2] [,3]
a 1 2 3
b 2 3 4
> rbind(b,a)
[,1] [,2] [,3]
b 2 3 4
a 1 2 3
那是:
asd <- vector()
for(girdi1 in 1:304) {
print(girdi1)
meslek1<-diff(as.data.frame(amges[,girdi1])[,1], lag=1, differences=1)
asd <- rbind(asd, meslek1)
}
write.csv(asd, file='asd.csv')