# Add a very simple writer for json
json_writer <- function(data, resource_name, datapackage, ...) {
dataresource <- dp_resource(datapackage, resource_name)
path <- dp_path(dataresource, full_path = TRUE)
jsonlite::write_json(data, path)
}
dp_add_writer("json", json_writer)
Run the code above in your browser using DataLab