如何存儲一個sqlQuery數據框？

Question

我迭代了一個我用來創建一個sql查詢的日期數組。

日期< - C（ 「2010-06-29」， 「2010-07-09」， 「2010-07-22」）

fn1 <- function (N) 
{ 
    queryStart <- "SELECT something FROM somethingelse WHERE table.date ='" 
    queryEnd <- "'AND table.something = 'foo'" 
    for(i in 1:length(N)) { 
     query1 <- paste(queryStart,N[i],queryEnd) 
     result <- sqlQuery(con, query1) //print(sqlQuery(con,query1) works as intended 
    } 
    return (result) 
} 

FN1（日期）

如何適合所有在一個數據框？有人可以幫我嗎？

Answer 1

試試這個，我沒有測試它雖然...

fn1 <- function (N) 
{ 
    queryStart <- "SELECT something FROM somethingelse WHERE table.date ='" 
    queryEnd <- "'AND table.something = 'foo'" 
    allQueries<-data.frame(matrix(nrow=0,ncol=0)); 
    for(i in 1:length(N)) { 
     query1 <- paste(queryStart,N[i],queryEnd) 
     result <- sqlQuery(con, query1) //print(sqlQuery(con,query1) works as intended 
     if (nrow(allQueries) == 0){ 
      allQueries<-result; 
     } 
     else{ 
      allQueries<-rbind(allQueries,result); 
     } 
    } 
    return (allQueries); 
}