Skip to contents

# Create a database
api_post("databanks/add", payload=list("name"="dio","category"="DIO"))

# Clear databases in a category
dbs <- fetch_table("databanks", params=c("category"="DIO"))

for (dbid in dbs$id) {
  api_post(paste0("databanks/drop/", dbid))
  api_post(paste0("databanks/create/", dbid))
}