datax <- read.csv("C:\\Users\\Jennifer\\Desktop\\place.csv",header=T,sep="\t") datay <- read.csv("C:\\Users\\Jennifer\\Desktop\\price.csv",header=T,sep="\t") merge(datax,datay,by=‘product‘)
product place price pm_num
1 apple 上海 2.1 3
2 orange 广州 3.0 6
3 peek 上海 4.0 6
4 peer 深圳 3.0 4
5 water 北京 4.0 5
数据框的合并（根据某一个字段）,布布扣,bubuko.com
原文：http://www.cnblogs.com/ilxx1988/p/3815730.html