全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
1214 1
2015-02-04
背景情况:公司后台给出数据库数据:SQL查询出的数据,保存格式是excel(.xlsx)然后一个表里面有很多工作表,因为是做整个数据,我需要把这些表都放在一个数据框里,要整体计算。

我的代码

library(RODBC)
alldata <- odbcConnectExcel2007("同一身份证开立支付账户的关联监控.xlsx")
sqlTables(alldata)$TABLE_NAME;#显示excel中所有表的名字
mydata<-lapply(sqlTables(alldata)$TABLE_NAME,function(x) sqlFetch(alldata,x))写入数据
data<-do.call("rbind",mydata)




sqlTables(alldata)结果


sqlTables(alldata)结果.png

sqlTables(alldata)$TABLE_NAME结果
sqlTables(alldata)$TABLE_NAME结果.png

错误出现在
mydata<-lapply(sqlTables(alldata)$TABLE_NAME,function(x) sqlFetch(alldata,x))写入数据
中的sqlFetch(alldata,x)中,如果sqlTables(alldata)$TABLE_NAME中的每个结果没有双引号就可以成功了,我想问一下如何删除这些双引号,或者在lapply引用的时候去掉双引号呢?

二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

全部回复
2015-2-26 16:31:12
要不你别用这个包了
安装xlsx扩展包。(需要先装java)
之后library(xlsx),使用read.xlsx就可以了~

要是保险一点的,就直接做数据框,具体内容从excel里面导入就可以了
mydataframe=data.frame()
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群