Get all records from a community?

[rkrug]

Hi
I want to get all records in a community (IPBES) to analyse and show the links between them as in the metadata. But I can't find a way of getting these. IS there a way to use getRecords() for a whole community?

Thanks.

[rkrug]

At the moment I am doing the following:

# Load the zen4R library
library(zen4R)

# Authenticate with Zenodo
zen <- ZenodoManager$new(token = Sys.getenv("Zenodo_IPBES_RO"))

# Get the community ID
community_id <- "ipbes"

# Get the community info
community <- zen$getCommunityById(community_id)

# Get all deposits with ipbes somwhere
IPBES_records <- zen$getRecords(community_id)

# Filter records based on the community ID
ipbes <- sapply(
    IPBES_records,
    function(record) {
        "ipbes" %in% unlist(record$metadata$communities)
    }
)

IPBES_records <- IPBES_records[ipbes]

rm(ipbes)

But it feels like a hack...