13632880181 dir.create('c:/r4r')write.csv(as.data.frame(t(matrix(co2,12,dimnames = list(month.abb,unique(floor(time(co2))))))),file='c:/r4r/co2.csv')
qiushi dir.create('c:/r4r') write.csv(as.data.frame(t(matrix(co2,12,dimnames = list(month.abb,unique(floor(time(co2))))))),file='c:/r4r/co2.csv')