kaifengedu 发表于 2014-12-18 10:55 
能举个例子讲一下吗?怎么用join函数?
library(plyr)
first <- ddply(baseball, "id", summarise, first = min(year))
system.time(b2 <- merge(baseball, first, by = "id", all.x = TRUE))
system.time(b3 <- join(baseball, first, by = "id"))
> system.time(b2 <- merge(baseball, first, by = "id", all.x = TRUE))用户 系统 流逝 0.87 0.02 0.89 > system.time(b3 <- join(baseball, first, by = "id"))用户 系统 流逝 0.17 0.00 0.17