R语言---SQLDF使用

A=read.csv("F:\\TEST\\ims_r.CSV",header=F)
B=read.csv("F:\\TEST\\hlr_N.CSV")
colnames(A)=c('a','b','c','d','e','f')  ####给没有字段的表增加字段名
library(sqldf) 
s=sqldf("select A.*  FROM A A,B B where A.a=B.isdn")
write.csv(s,"F:\\TEST\\output1.csv",row.names=FALSE)