与其在开始时将它们读入 R 然后组合它们,您可以让 SQLite 在将它们发送到 R 之前读取它们并组合它们。这样,文件永远不会单独加载到 R 中。
# create two sample files
DF1 <- data.frame(A = 1:2, B = 2:3)
write.table(DF1, "data1.dat", sep = ",", quote = FALSE)
rm(DF1)
DF2 <- data.frame(A = 10:11, B = 12:13)
write.table(DF2, "data2.dat", sep = ",", quote = FALSE)
rm(DF2)
# now we do the real work
library(sqldf)
data1 <- file("data1.dat")
data2 <- file("data2.dat")
sqldf(c("select * from data1",
"insert into data1 select * from data2",
"select * from data1"),
dbname = tempfile())
这给出了:
> sqldf(c("select * from data1", "insert into data1 select * from data2", "select * from data1"), dbname = tempfile())
A B
1 1 2
2 2 3
3 10 12
4 11 13
如果行顺序不重要,这个较短的版本也可以工作:
sqldf("select * from data1 union select * from data2", dbname = tempfile())
有关更多信息,请参阅 sqldf 主页http://sqldf.googlecode.com?sqldf
。请特别注意文件格式参数,因为它们与read.table
. 在这里,我们使用了默认值,因此问题不大。