Loop over R function write.csv -

Loop over R function write.csv -

i write loop export r info multiple years separate excel files. not straightforward be. suggestion on how can go this?

so tedious r code looks this:

id_all = data.frame(temp[c(1:4)]) result_all = data.frame(id_all,scorey1_2013,eff.bcy1_2013, scorey2_2013,eff.bcy2_2013, x2013,y2_2013) write.csv(result_all, file = "r/results/test_2013.csv") result_all = data.frame(id_all,scorey1_2012,eff.bcy1_2012, scorey2_2012,eff.bcy2_2012, x2012,y2_2012) write.csv(result_all, file = "r/results/test_2012.csv") result_all = data.frame(id_all,scorey1_2011,eff.bcy1_2011, scorey2_2011,eff.bcy2_2011, x2011,y2_2011) write.csv(result_all, file = "r/results/test_2011.csv")

i love transform this:

for (i = 2011:2013) { id_all = data.frame(temp[c(1:4)]) result_all = data.frame(id_all,scorey1_i,eff.bcy1_i, scorey2_i,eff.bcy2_i, xi,y2_i) write.csv(result_all, file = "r/results/test_i.csv") }

this lot simpler if stored various variables in info frames or lists (or list of info frames). can seek like:

for(i in 2011:2013) { result_all <- data.frame(id_all, get( sprintf("scorey1_%d", i)), get(sprintf("eff.bcy1_%d",i))) write.csv(result_all, file=sprintf("r/results/test_%d.csv",i)) }

r