使用magicfor在R中保存循环

编程问答 2022-06-03

问题描述

我正在提取太阳能数据库的数据，我试图用magicfor将r中每年的每个循环输出保存，这是代码：

RS <- read.table("./RS_29015040.csv",head=T,sep=";",dec=",")
RS$Fecha <- as.POSIXct(RS$Fecha,format="%d/%m/%Y %H:%M")       
RS$Ano <- as.integer(substr(RS$Fecha,1,4))              
RS$Mes <- as.integer(substr(RS$Fecha,6,7))  
    
library(magicfor)
magic_for(silent = TRUE)

for (i in 1999:2020){

for (c in 1:12){
  RSM <- subset(RS,Ano==i & Mes==c) 
  dime <- dim(RSM)
  tamañomes <- dime[c(1)]
  put(i,tamañomes)
  }
salida2 <- magic_result_as_dataframe()
write.csv (salida2,file =paste("meses",i,".csv"))
 }

它只用一个循环就可以完美工作，插入第二个循环（1999年至2020年）时出现问题

有人知道保存循环的另一种方法吗？或者实际代码有什么问题？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

databasedatetimedatetimeloopsrrsolar