11

这应该很简单,我可能只是很傻,但是...我需要通过 df1 的行名和 df2 中的列合并两个数据框,即

df1<-data.frame(x=1:3,y=4:6) 
rownames(df1)<-c("a","b","c")
df1
  x y
a 1 4
b 2 5
c 3 6

df2<-data.frame(site=c("a","b"),p=5:6,q=10:11)
df2
  site p  q
     a 5 10
     b 6 11

合并应产生:

df3<-data.frame(site=c("a","b"),p=5:6,q=10:11,x=1:2,y=4:5)
df3
  site p  q x y
     a 5 10 1 4
     b 6 11 2 5

我努力了

merge(df1,df2,by.x=row.names(df1),by.y=df2$site) 

但得到错误

fix.by(by.x, x) 中的错误:“by”必须指定唯一有效的列

我究竟做错了什么?

4

2 回答 2

13

这是一种选择:

merge(df1, df2, by.x = "row.names", by.y = "site")
  Row.names x y p  q
1         a 1 4 5 10
2         b 2 5 6 11
于 2012-09-11T10:02:06.497 回答
4

'by' 参数必须是列名。像这样的东西会起作用

merge(cbind(df1, row=row.names(df1)), df2, by.x="row", by.y="site")
于 2012-09-11T09:57:07.057 回答