# \donttest{
# Add items from `ZoteroIsbn` to the default Zotero list
example <- ZoteroAdd(
Zotero(
id = "9913421",
api = "RqlAmlH5l1KPghfCseAq1sQ1"
),
isbn = "978-1529797138"
)
# Print index using `ZoteroIndex`
if (any(nrow(example$items))) {
ZoteroIndex(example$items) |>
dplyr::select(name) |>
print(width = 80)
}
# }
Run the code above in your browser using DataLab