R:基于字符向量选择sqlite数据库的子集

Question

我正在尝试使用字符向量来提取我的数据库的一部分。为了解释，我使用了下面的mtcar数据：

library(dplyr)
library(sqldf)
library(RSQLite)

df <- cbind(rownames(mtcars),mtcars)
colnames(df)[1] <- "CarName"
CarsToFind <- c("Valiant", "Merc 280", "Lotus Europa", "Volvo 142E")
db <- dbConnect(SQLite(), dbname = 'mtcars_db.sqlite3')
dbWriteTable(conn = db, name = 'mtcars_table', value = df, row.names = TRUE, header = TRUE)

我可以找到我感兴趣的数据框部分：

mini_df <- df[df$CarName %in% CarsToFind,]

但我的实际数据相当大，我不愿将整个数据提取到一个数据框架中。我正在寻找类似以下内容的内容：

sqldf("SELECT * FROM mtcars_table WHERE CarName IN CarsToFind")

但是这给了我一个错误：“没有这样的表: CarsToFind”。我不想在SQL数据库中创建'CarsToFind‘表，因为我有许多不同的查询需要一次性执行。可以使用这样的字符向量来查询SQL吗？

Answer 1

您实际想要在SQLite上执行的查询应该如下所示：

SELECT *
FROM mtcars
WHERE CarName IN ('Valiant', 'Merc 280', 'Lotus Europa', 'Volvo 142E')

因此，您需要做的就是在R中构建此字符串：

CarsToFind <- c("Valiant", "Merc 280", "Lotus Europa", "Volvo 142E")
CarsToFind <- paste0("'", CarsToFind, "'", collapse=", ")
whereIn <- paste0("(", CarsToFind, ")")

query <- paste0("SELECT * FROM mtcars WHERE CarName IN ", whereIn)             
sqldf(query)

Answer 2

创建一个只有一列的dataframe，而不是创建一个字符向量，怎么样？这将会起作用：

CarsToFind <- data.frame(lookup=c("Valiant", "Merc 280", "Lotus Europa", "Volvo 142E"))

sqldf("SELECT * FROM df WHERE CarName IN CarsToFind")

此外，通过这种方式，您不必在SQL端更改/添加任何内容，您仍然可以将所有内容保留在R端。