使用R中的for循环读取,操作和导出多个.dta文件

时间:2015-09-19 14:17:36

标签: r loops

我有多个时间序列(每个都在一个单独的文件中),我需要使用R中的季节包季节性地调整,并将调整后的系列再次存储在另一个目录中的单独文件中。 该准则适用于一个县。

所以我尝试使用for循环,但R无法使用带有通配符的read.dta。

我是R的新手并且经常使用Stata,所以这个问题可能非常愚蠢而我的代码非常混乱。

抱歉,并提前致谢

for(i in 1:402)
{
alo[i] <- read.dta("/Users/nathanrhauke/Desktop/MA_NH/Data/ALO/SEASONAL_ADJUSTMENT/SINGLE_SERIES/County[i]")
alo_ts[i] <-ts(alo[i], freq = 12, start = 2007)
m[i] <- seas(alo_ts[i])

original[i]<-as.data.frame(original(m[i]))
adjusted[i]<-as.data.frame(final(m[i]))
trend[i]<-as.data.frame(trend(m[i]))
irregular[i]<-as.data.frame(irregular(m[i]))

County[i] <- data.frame(cbind(adjusted[i],original[i],trend[i],irregular[i], deparse.level =1))
write.dta(County[i], "/Users/nathanrhauke/Desktop/MA_NH/Data/ALO/SEASONAL_ADJUSTMENT/ADJUSTED_SERIES/County[i].dta")
}

0 个答案:

没有答案