结合两个保留所有列的数据帧

时间:2015-06-24 11:13:22

标签: r dataframe plyr dplyr

我想要做的是组合2个数据帧,保留所有列(在下面的示例中没有完成),并输入零,数据帧中存在来自非常见变量的空白。

这似乎是一个plyr或dplyr主题。但是,plyr中的完全连接不会保留所有列,而左连接或右连接不会保留我想要的所有行。看一下dplyr cheatsheet(http://www.rstudio.com/wp-content/uploads/2015/02/data-wrangling-cheatsheet.pdf),full_join似乎是我需要的函数,但是在成功加载包之后R不能识别这个函数。

举个例子:

col1 <- c("ab","bc","cd","de")
col2 <- c(1,2,3,4)
df1 <- as.data.frame(cbind(col1,col2))
col1 <- c("ab","ef","fg","gh")
col3 <- c(5,6,7,8)
df2 <- as.data.frame(cbind(col1,col3))
library(plyr)
Example <- join(df1,df2,by = "col1", type = "full") #Does not keep col3
library(dplyr)
Example <- full_join(df1,df2,by = "col1") #Function not recognised

我想要输出......

col1 col2 col3
ab    1    5
bc    2    0
cd    3    0
de    4    0
ef    0    6
fg    0    7
gh    0    8

2 个答案:

答案 0 :(得分:2)

解决方案

Example <- merge(df1, df2, by = "col1", all = TRUE)` 

Example <- join(df1,df2,by = "col1", type = "full")

给出相同的结果,两者都有一些NA&#39>:

#> Example
#  col1 col2 col3
#1   ab    1    5
#2   bc    2 <NA>
#3   cd    3 <NA>
#4   de    4 <NA>
#5   ef <NA>    6
#6   fg <NA>    7
#7   gh <NA>    8

用零替换这些条目的一种可能性是将数据帧转换为矩阵,更改条目,然后转换回数据框:

Example <- as.matrix(Example)
Example[is.na(Example)] <- 0
Example <- as.data.frame(Example)
#> Example
#  col1 col2 col3
#1   ab    1    5
#2   bc    2    0
#3   cd    3    0
#4   de    4    0
#5   ef    0    6
#6   fg    0    7
#7   gh    0    8

PS:我几乎可以肯定@akrun知​​道另一种方法可以在一行中实现这一目标;)

答案 1 :(得分:1)

按照David Arenberg上面的评论......

Example <- merge(df1, df2, by = "col1", all = TRUE)