R语言如何合并不同长度的数据框

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

如题，有两组列长度不一致的数据，要把他合并

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：R语言 数据框

如果是要纵向合并（合并后列数不变），用rbind(df1, df2). 如果要横向合并，那么必须在这两个data.frame之间有共有的列，比如col1，这样的话可以用merge(df1, df2, by=col1,all=T)来合并数据。具体参数请参考rbind和merge函数的help文件。

用NA补齐小数据的列，然后rbind合并

fortune9 发表于 2017-7-14 04:30
如果是要纵向合并（合并后列数不变），用rbind(df1, df2). 如果要横向合并，那么必须在这两个data.frame之间 ...

rbind 必须要列长相同才行吧，我这里有大概几十个列长不同的数据框，我想把他们纵向合并

jxapp_31214 发表于 2017-7-14 09:45
rbind 必须要列长相同才行吧，我这里有大概几十个列长不同的数据框，我想把他们纵向合并

对，rbind要求合并的数据框有相同的列数，如果列数不同，rbind的合并好像也没有什麽意义（你肯定不想把数据框1的A列跟数据框2的B列合并到一起对吧）。要么你需要把列数少的数据框缺乏的列先用NA补上，然后再用rbind。如果需具体回答，请附上几行样本数据。

fortune9 发表于 2017-7-15 00:45
对，rbind要求合并的数据框有相同的列数，如果列数不同，rbind的合并好像也没有什麽意义（你肯定不想把数 ...

工作簿2.xlsx (42.24 KB)

2017-7-17 16:40:09 上传

工作簿1.xlsx (42.89 KB)

2017-7-17 16:40:08 上传

就是这种样子的数据，大概50个左右，我希望吧这些数据直接合并

jxapp_31214 发表于 2017-7-17 16:41
就是这种样子的数据，大概50个左右，我希望吧这些数据直接合并

首先把两个表格在excel里面另存为tab-delimited数据，并且命名为data1.txt和data2.txt.然后用下面的R code纵向合并两个数据库：

d1<-read.table("data1.txt")
d2<-read.table("data2.txt")
d3<-rbind(d1,d2)
write.table(d3,file="merged.txt", sep="\t", col.names=F, row.names = F, quote=F)

结果将保存在文件merged.txt里面。为了你的方便，我附上了我转换和得到的结果文件 merged.txt (18.24 KB)

2017-7-19 00:54:49 上传

结果文件

data2.txt (9.24 KB)

2017-7-19 00:54:48 上传

数据文件2

data1.txt (9 KB)

2017-7-19 00:54:48 上传

数据文件1

fortune9 发表于 2017-7-19 00:52
首先把两个表格在excel里面另存为tab-delimited数据，并且命名为data1.txt和data2.txt.然后用下面的R cod ...

.... 不是这样合并，我要横向合并，就是把不等长的列合横向合并起来

jxapp_31214 发表于 2017-7-20 15:59
.... 不是这样合并，我要横向合并，就是把不等长的列合横向合并起来

那就根据两个数据的第一列这样合并：

d1<-read.table("data1.txt")
d2<-read.table("data2.txt")
names(d1)<-c("date","val1")
names(d2)<-c("date","val2")
d3<-merge(d1,d2, by="date", all=T)
write.table(d3,file="merged.txt", sep="\t", col.names=F, row.names = F, quote=F)

对与在一个数据框中缺失的数据，在对应的列va1或val2就会显示成NA。

fortune9 发表于 2017-7-21 04:23
那就根据两个数据的第一列这样合并：

d1

多谢多谢