db_path <- system.file("extdata", "country.db", package = "Rparadox")
pxdoc <- pxlib_open_file(db_path)
if (!is.null(pxdoc)) {
metadata <- pxlib_metadata(pxdoc)
print(metadata)
pxlib_close_file(pxdoc)
}
Run the code above in your browser using DataLab