list结构比较复杂时如何增添一列

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

x1<-c("2015-01-01","2015-01-02","2015-01-03","2015-01-04","2015-01-05","2015-01-06","2015-01-07","2015-01-08","2015-01-09","2015-01-10","2015-01-11")
x2<-c(1,5,8,9,8.1,10,11,7.4,6.2,4.8,12)
x3<-c(0.12,0.11,0.02,0.31,0.22,0.17,0.43,0.35,0.61,0.44, 0.29)
x<-data.frame(x1,x2,x3)
data.list<-list()
for(i in 6:10)
{
  data.list[[i-5]]<- filter(x,x2>=i)
}
data.list1<-list()
data.list1<-lapply(data.list,function(x) x$x3/sum(x$x3))
data.list[[1]]$x4<-data.list1[[1]]
但是这样的结果就是只有data.list[[1]]增添了一列，如果我想整个data.list都增添上x4,难道还要写个循环吗，有没有好一点的方法还有，如果再添加上
data.list2<-lapply(data.list,function(x) x$x2/sum(x$x2))data.listtemp<-list(data.list,data.list1)
data.listtemp<-list(data.listtemp,data.list2)
出来的结果是
[[1]]
[[1]][[1]]
[[1]][[1]][[1]]


[[1]][[2]]
[[1]][[2]][[1]]


[[2]]
[[2]][[1]]

可是我想要的格式是
[[1]]
[[1]][[1]]


[[2]]
[[2]][[1]]


[[3]]
[[3]][[1]]

这样的请问该如何改，如果每次出来的只是一个data.list,只能两个两个结合，而不能三个结合 list(data.list,data.list1,data.list2)

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：list IST 如何