数据框的合并（根据某一个字段）

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