控制面板——管理工具——数据源（ODBC）——配置（库名称与密码）

library(RODBC)

channle <- odbcConnect("oracle",uid ="name",pwd ="password",believeNRows=FALSE)

train1<- sqlQuery(channle,"select * from A")


搞定！