我正在从数据库中获取表的名称,我希望从每个表中选择所有数据,并自动创建一个数据。密码
nm = dbListTables(connection)创建一个向量,如:
[1] "Account" "Credit__Amortization_Payment__c"
[3] "Credit__Amortization_Schedule__c" "Credit__Loan_Payment__c"
[5] "Credit__Loan__c"举个例子
nm = c("Account", "Credit__Amortization_Payment__c", "Credit__Amortization_Schedule__c", "Credit__Loan_Payment__c", "Credit__Loan__c")我为循环中的每个值创建了一个查询列表:
qry <- list()
for (i in 1:length(nm)) {
qry[i] <- paste0("select * from ", nm[i])
}然后我想不出如何将数据帧的名称保存为向量中的值,所以我必须像这样手动输入它,但是我想循环通过它,从列表nm中保存一个名称和结构完全相同的数据帧。
q = paste0(qry[1])
rs <- dbSendQuery(con, q)
Account <- dbFetch(rs, n=-1)我在这里手动地对向量中的每个值重复它,但是我想根据nm =dbListTables(连接)中的值自动地这样做。
q = paste0(qry[3])
rs <- dbSendQuery(con, q)
Credit__Amortization_Schedule__c <- dbFetch(rs, n=-1)发布于 2016-05-06 12:57:09
我认为assign是你要找的。
> assign("x", 5)
> x
[1] 5在您的情况下,例如查询1
q <- paste0(qry[1])
rs <- dbSendQuery(con, q)
assign(nm[1], dbFetch(rs, n=-1))应该行得通。还请看一下R常见问题。
https://stackoverflow.com/questions/37072731
复制相似问题