if(dev.interactive()){
# build the example database
adb_exampleDB(until = "regGeometry", path = tempdir())
# the schema description for this table
library(tabshiftr)
schema_madeUp <-
setIDVar(name = "al1", columns = 1) %>%
setIDVar(name = "year", columns = 2) %>%
setIDVar(name = "commodities", columns = 3) %>%
setObsVar(name = "harvested",
factor = 1, columns = 4) %>%
setObsVar(name = "production",
factor = 1, columns = 5)
regTable(nation = "Estonia",
subset = "barleyMaize",
label = "al1",
dSeries = "madeUp",
gSeries = "gadm",
begin = 1990,
end = 2017,
schema = schema_madeUp,
archive = "example_table.7z|example_table1.csv",
archiveLink = "...",
nextUpdate = "2024-10-01",
updateFrequency = "quarterly",
metadataLink = "...",
metadataPath = "my/local/path")
}
Run the code above in your browser using DataLab