r - 从 GitHub 导入 SQLite 数据库

Question

如何将 SQLite 数据库从 GitHub 存储库导入我的 R 环境？

如果我的本地硬盘上有一个 SQLite 数据库，我可以执行以下操作，我想将其推广到存储在 GitHub 上的 SQLite DB：

library("RSQLite") 
db <- dbConnect(SQLite(), dbname="/path_to_file/database.sqlite")
dbListTables(db)
players<- dbGetQuery( db,'
                      select column1 
                      from table1
                      ' )

我要导入的链接示例如下： https ://github.com/cmohamma/jeopardy

如果无法从网络连接将 SQLite 数据库加载到内存中，我至少想知道如何通过命令行界面将其下载到磁盘。

我尝试通过 RSelenium 访问存储库，但我不知道如何让浏览器 (Chrome) 从 GitHub 下载任何内容 - 我可以导航到存储库中的文件，但我无法识别下载按钮。

Answer 1

您可以将原始 sqlite 文件保存到临时文件中：

library("RSQLite") 
temp <- tempfile()
download.file("https://github.com/cmohamma/jeopardy/blob/master/database.sqlite?raw=true", temp)
db <- dbConnect(SQLite(), dbname=temp)
dbListTables(db)
#  [1] "Strike1Players"         "Strike2Players"         "Strike3Players"        
#  [4] "ThreeStrikesClues"      "WrongAnswers"           "categories"            
#  [7] "clue_wrong_answers"     "clues"                  "final"                 
# [10] "final_jeopardy_answers" "game_players"           "games"                 
# [13] "players"                "sqlite_sequence"        "temp"