# NOT RUN {
# Setup
ckanr_setup(url = "https://demo.ckan.org/", key = getOption("ckan_demo_key"))
# create a package and a related item
res <- package_create("hello-pluto2") %>%
related_create(title = "my resource",
type = "visualization")
# show the related item
related_show(res)
related_show(res$id)
# get data back in different formats
related_show(res, as = 'json')
related_show(res, as = 'table')
# }
Run the code above in your browser using DataLab