我试图创建一个数据库,当我在网上查找时,我发现了这个教程。此处
它采取的步骤是使用
my_db_file <- "data/portal-database-output.sqlite"
my_db <- src_sqlite(my_db_file, create = TRUE)
当我执行file.exists("database.sqlite")
时,它会打印FALSE
。我想知道是否有办法获得";database.sqlite";这样我就可以完成这个数据库的创建了?是包裹里的吗?任何帮助都将不胜感激!
使用第一行创建的文件是data/
目录下的portal-database-output.sqlite
。如果你愿意,
file.exists("data/portal-database-output.sqlite")
则应当返回CCD_ 5。
你需要读取数据,创建数据库,然后你可以将你的数据添加到其中
library(tidyverse)
download.file("https://ndownloader.figshare.com/files/3299483",
"species.csv")
species <- read_csv("data/species.csv")
my_db_file <- "data/portal-database-output.sqlite"
my_db <- src_sqlite(my_db_file, create = TRUE)
copy_to(my_db, surveys)
输出
my_db
src: sqlite 3.35.5 [portal-database-output.sqlite]
tbls: species, sqlite_stat1, sqlite_stat4
file.exists("data/portal-database-output.sqlite")
[1] TRUE