R语言merge函数总结 [推广有奖]

1关注
31粉丝

已卖：1166份资源

教授

33%

还不是VIP/贵宾

威望: 0 级
论坛币: 121239 个
通用积分: 62.0400
学术水平: 140 点
热心指数: 152 点
信用等级: 84 点
经验: 56173 点
帖子: 1180
精华: 1
在线时间: 1120 小时
注册时间: 2008-11-6
最后登录: 2024-4-29

楼主

李会超 发表于 2014-10-6 10:22:16 |AI写论文

是否 +2 论坛币

k人参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

写sql写习惯了，学R的时候也想用到类似sql里面的merge功能，看了r帮助文档后进行了一些总结
以r文档里面的例子来介绍，假如有这样两个数据框authors和books
authors <- data.frame(
surname = I(c("Tukey", "Venables", "Tierney", "Ripley", "McNeil")),
nationality = c("US", "Australia", "US", "UK", "Australia"),
deceased = c("yes", rep("no", 4)))
books <- data.frame(
name = I(c("Tukey", "Venables", "Tierney",
         "Ripley", "Ripley", "McNeil", "R Core")),
title = c("Exploratory Data Analysis",
            "Modern Applied Statistics ...",
            "LISP-STAT",
            "Spatial Statistics", "Stochastic Simulation",
            "Interactive Data Analysis",
            "An Introduction to R"),
other.author = c(NA, "Ripley", NA, NA, NA, NA,
                  "Venables & Smith"))

如果要实现类似sql里面的inner join 功能，则用代码
m1 <- merge(authors, books, by.x = "surname", by.y = "name")
如果要实现left join功能则用代码
m1 <- merge(authors, books, by.x = "surname", by.y = "name",all.x=TRUE)
right join功能代码
m1 <- merge(authors, books, by.x = "surname", by.y = "name",all.y=TRUE)
all join功能代码
m1 <- merge(authors, books, by.x = "surname", by.y = "name",all=TRUE)

关于单变量匹配的总结就是这些，但对于多变量匹配呢，例如下面两个表，需要对k1,k2两个变量都相等的情况下匹配
x <- data.frame(k1 = c(NA,NA,3,4,5), k2 = c(1,NA,NA,4,5), data = 1:5)
y <- data.frame(k1 = c(NA,2,NA,4,5), k2 = c(NA,NA,3,4,5), data = 1:5)

匹配代码如下merge(x, y, by = c("k1","k2"))  #inner join