楼主: mashagua
25237 13

[问答] R语言中如何取出list中的数据 [推广有奖]

  • 0关注
  • 1粉丝

博士生

88%

还不是VIP/贵宾

-

威望
0
论坛币
60 个
通用积分
69.1920
学术水平
1 点
热心指数
1 点
信用等级
0 点
经验
3931 点
帖子
198
精华
0
在线时间
258 小时
注册时间
2013-9-20
最后登录
2020-12-21

楼主
mashagua 学生认证  发表于 2016-7-30 09:26:06 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
data.list
[[1]]
  x1 x2   x3
1  d  9 0.31
2  e  8 0.22
3  h 10 0.17
4  k 11 0.43
5  l  7 0.35
6  m  6 0.61
7  n  8 0.44
8  p 12 0.29

[[2]]
  x1 x2   x3
1  d  9 0.31
2  e  8 0.22
3  h 10 0.17
4  k 11 0.43
5  l  7 0.35
6  n  8 0.44
7  p 12 0.29
我想取出data.list[[2]]中x3的第一个元素,请问该怎么操作

二维码

扫码加我 拉你入群

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

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

关键词:list R语言 IST Data 怎么操作 如何

沙发
dieyuyu 发表于 2016-7-30 11:43:25
data.list[[2]]$x3
已有 1 人评分经验 收起 理由
李会超 + 20 热心帮助其他会员

总评分: 经验 + 20   查看全部评分

藤椅
jiangbeilu 学生认证  发表于 2016-7-31 16:31:36

data.list[[2]]$x3[1],如果你想对列表进行批量操作,可以使用apply系列,包括lapply,sapply,这两个主要是针对列表操作的。
已有 1 人评分经验 收起 理由
李会超 + 20 热心帮助其他会员

总评分: 经验 + 20   查看全部评分

板凳
mashagua 学生认证  发表于 2016-7-31 16:49:54
jiangbeilu 发表于 2016-7-31 16:31
data.list[[2]]$x3[1],如果你想对列表进行批量操作,可以使用apply系列,包括lapply,sapply,这两个主要是 ...
嗯,谢谢

报纸
mashagua 学生认证  发表于 2016-7-31 17:46:36
jiangbeilu 发表于 2016-7-31 16:31
data.list[[2]]$x3[1],如果你想对列表进行批量操作,可以使用apply系列,包括lapply,sapply,这两个主要是 ...
谢谢,比如说我要每一个列表的第三列中的每个元素去除第三列的总和,用apply可以做吗
就是0.31/(0.22+0.31+0.17+0.43+0.35+0.61+0.44+0.29),0.22/(0.22+0.31+0.17+0.43+0.35+0.61+0.44+0.29)这种的

地板
jiangbeilu 学生认证  发表于 2016-7-31 21:12:21
lapply(datalist,function(x) x$x3/sum(x$x3))

x$x3这是一个整体

7
mashagua 学生认证  发表于 2016-8-1 10:37:35
jiangbeilu 发表于 2016-7-31 21:12
lapply(datalist,function(x) x$x3/sum(x$x3))

x$x3这是一个整体
x2<-c(1,3.5,2.8,9,8.1,10,11,7.4,6.2,4.8,1.2)
> 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)
+ }
> lapply(data.list,function(x),x$x3/sum(x$x3))
Error: unexpected ',' in "lapply(data.list,function(x),"

8
mashagua 学生认证  发表于 2016-8-1 10:37:42
jiangbeilu 发表于 2016-7-31 21:12
lapply(datalist,function(x) x$x3/sum(x$x3))

x$x3这是一个整体
x2<-c(1,3.5,2.8,9,8.1,10,11,7.4,6.2,4.8,1.2)
> 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)
+ }
> lapply(data.list,function(x),x$x3/sum(x$x3))
Error: unexpected ',' in "lapply(data.list,function(x),"

9
jia_jackie 发表于 2016-8-1 16:46:41
data.list[[2]][1]

10
mashagua 学生认证  发表于 2016-8-1 16:50:55
jiangbeilu 发表于 2016-7-31 21:12
lapply(datalist,function(x) x$x3/sum(x$x3))

x$x3这是一个整体
我已经知道错在哪里了,谢谢你,你不用回复了

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-9 07:10