# NOT RUN {
library(readr)
inPath <- system.file("test_datasets", package = "arealDB", mustWork = TRUE)
# start the example database
makeExampleDB(until = "setPath")
# create index from an already existing table
comm <- read_csv(file = paste0(inPath, "/id_commodities.csv"),
col_types = "iccc")
setVariables(input = comm, variable = "commodities",
pid = "faoID", target = "simpleName")
# }
Run the code above in your browser using DataLab