利用R语言合并数据框的行与列实例代码

rbind() # 按行合并指定数据
cbind() # 按列合并指定数据

rbind(c(1,2,3),c(4,5,6)) # 按行合并
     [,1] [,2] [,3]
[1,]    1    2    3
[2,]    4    5    6

cbind(c(1,2,3),c(4,5,6)) # 按列合并
     [,1] [,2]
[1,]    1    4
[2,]    2    5
[3,]    3    6

a <- matrix(c(1,2,3,4,5,6),2,3) #创建矩阵
a
     [,1] [,2] [,3]
[1,]    1    3    5
[2,]    2    4    6
cbind(a,c(5,7)) #按列合并

merge(
  x # 待合并的数据框
  y # 待合并的数据框
  by #用作合并基准的列
  all = FALSE #共同值不存在xy二者之一时，可以使用all
)

# 数学成绩
math <- data.frame(name=c("迪迦","泰罗","赛文"),math=c(76,84,64))
# 英语成绩
english <- data.frame(name=c("泰罗","赛文","迪迦"),english=c(95,59,42))

(c <- merge(math,english))
  name math english
1 迪迦   76      42
2 赛文   64      59
3 泰罗   84      95

(d <- cbind(math,english))
  name math name english
1 迪迦   76 泰罗      95
2 泰罗   84 赛文      59
3 赛文   64 迪迦      42

#创建两个数据框，共有四个奥特曼的成绩
math <- data.frame(name=c("迪迦","泰罗","赛文"),math=c(76,84,64))
english <- data.frame(name=c("艾斯","赛文","迪迦"),english=c(95,59,42))

# 只剩下两位奥特曼了
(c <- merge(math,english))
  name math english
1 迪迦   76      42
2 赛文   64      59

#当all为TRUE时，不是xy的共同行时，会被填充为NA
(c <- merge(math,english,all = TRUE))
  name math english
1 艾斯   NA      95
2 迪迦   76      42
3 赛文   64      59
4 泰罗   84      NA