在 R 中保存一个 for 循环
Save a for loop in R
我想保存一个用于输出
for (a in 2017:2018){
for (b in 1:12){
for (c in 1:30){
RSM <- subset(RS,Ano==a & Mes==b & Dia==c)
dime <- dim(RSM)
tdia = dime[c(1)]
}
}
}
我想在单个 csv 中保存 2017 年和 2018 年每个月的每一天的 tdia。
有什么想法吗?
保存循环结果的一般结构如下:
result <- vector(length=N)
for(i in 1:N) {
<do some things>
result[i] <- <value to save>
}
如果需要,您可以将 result
的内容保存到 csv 文件中:
write.csv(result, file="filename.csv")
但是,您似乎只是想通过三个日期变量来计算行数。以下是我如何使用 data.table 包(在一行中!):
library(data.table)
setDT(RS)
RS[ , .(num_de_filas=.N), by=.(Ano, Mes, Dia)]
我想保存一个用于输出
for (a in 2017:2018){
for (b in 1:12){
for (c in 1:30){
RSM <- subset(RS,Ano==a & Mes==b & Dia==c)
dime <- dim(RSM)
tdia = dime[c(1)]
}
}
}
我想在单个 csv 中保存 2017 年和 2018 年每个月的每一天的 tdia。 有什么想法吗?
保存循环结果的一般结构如下:
result <- vector(length=N)
for(i in 1:N) {
<do some things>
result[i] <- <value to save>
}
如果需要,您可以将 result
的内容保存到 csv 文件中:
write.csv(result, file="filename.csv")
但是,您似乎只是想通过三个日期变量来计算行数。以下是我如何使用 data.table 包(在一行中!):
library(data.table)
setDT(RS)
RS[ , .(num_de_filas=.N), by=.(Ano, Mes, Dia)]