r使用rsqlite和dbplyr，从DBI软件包中的函数中找到SQL数据库中的表格

Question

我一直在研究Andrew Couch的YouTube视频，介绍RSQLITE，DBI和DBPLYR套餐。 这是链接。

我遇到了一个错误，但是我不是确定发生了什么。 YouTube视频是一个不错的视频，但我认为AC并没有遇到我遇到的同一问题，因此我认为它在那里没有诊断出来。

我首先加载库：

library(dbplyr)
library(RSQLite)
library(DBI)

然后，我将mtcars重命名为sql_mtcars，然后创建与SQLITE数据库的连接，然后将我的DataFrame复制到该数据库。

sql_mtcars <- mtcars
con <- RSQLite::dbConnect(SQLite(), ":memory:")
dplyr::copy_to(con, sql_mtcars)

我将其变成表（我想是因为我必须吗？）

sql_mtcars_db <- tbl(con, "sql_mtcars")

练习编写查询，然后测试查询的SQL版本。

sql_mtcars_db %>%
  dplyr::select(car, mpg, wt) %>%
  dplyr::show_query()

但是这是我卡住的地方。现在我试图直接在 DBI的DbgetQuery函数。

DBI::dbGetQuery(con, '
SELECT sql_mtcars_db.mpg 
FROM sql_mtcars_db
  ')

我会出现此错误消息的提示：

Error: no such table: sql_mtcars_db

但是这让我感到困惑，因为当我运行此代码来调用表时：

sql_mtcars_db

我可以看到该表在SQLITE数据库中。

Answer 1

表名是sq_mtcars - ie 选择语句是针对特定table的，并且该连接已与数据库

DBI::dbGetQuery(con, '
SELECT sql_mtcars.mpg 
FROM sql_mtcars
  ')

-Output

  mpg
1  21.0
2  21.0
3  22.8
4  21.4
5  18.7
6  18.1
7  14.3
8  24.4
9  22.8
10 19.2
11 17.8
...

---

建立怀疑，列出表格

dbListTables(con)
[1] "sql_mtcars"   "sqlite_stat1" "sqlite_stat4"