dbc <- nodbi::src_sqlite(
dbname = system.file("extdata", "demo.sqlite", package = "ctrdata"),
collection = "my_trials",
flags = RSQLite::SQLITE_RO)
dbFindFields(namepart = "date", con = dbc)[1:5]
# view all 1880+ fields from all registers:
allFields <- dbFindFields(con = dbc, sample = FALSE)
if (interactive()) View(data.frame(
register = names(allFields),
field = allFields))
Run the code above in your browser using DataLab