如何根据data.frame2来修改data.frame1

1865

收藏 2013-01-27

data.frame1
code	var1	var2	var3
1	1a	1b	1c
2	2a	2b	2c
3	3a	3b	3c
4	4a	4b	4c

data.frame2
code	variable	value
2	var2	2bb
2	var3	2cc
3	var1	3aa
3	var3	3cc

扫码加我拉你入群

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

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

全部回复

qoiqpwqr

2013-1-28 00:16:43

你想要什么样的结果？

扫码加我拉你入群

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

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

lutian08

2013-1-28 09:15:52

qoiqpwqr 发表于 2013-1-28 00:16
你想要什么样的结果？

如data.frame2 中的第一条记录
code variable value
2 var2 2bb
表示data.frame1 中code=2的var2应改为2bb

扫码加我拉你入群

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

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

flamingstone

2013-1-30 22:48:22

for(i in 1:nrow(data.frame1)) {
for(j in 1:nrow(data.frame2)) {
if(data.frame1$code[i] == data.frame2$code[j]) data.frame1[i,as.character(data.frame2[j,"variable"])] <- data.frame2[j,"value"]
}
}

扫码加我拉你入群

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

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

jmpamao

2013-1-31 12:12:21

可能 reshape2包是你需要的额

require(reshape2)
renda1 <- read.table(text="code variable value
                  2 var2 2bb
                  2 var3 2cc
                  3 var1 3aa
                  3 var3 3cc",header=T,stringsAsFactors=F)
dcast(renda1,code~variable,value.var="value")

结果为：
  code var1 var2 var3
1 2 <NA>  2bb  2cc
2 3  3aa <NA>  3cc
是你需要的吗？

扫码加我拉你入群

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

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

lutian08

2013-1-31 15:18:50

jmpamao 发表于 2013-1-31 12:12
可能 reshape2包是你需要的额

require(reshape2)

不是的，还需要对另一个数据集进行修改

扫码加我拉你入群

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

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

点击查看更多内容…

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群