if (FALSE) {
# Get the ITRDB records
ITRDB <- get_itrdb(
template = FedData::meve,
label = "meve"
)
# Plot the VEP polygon
plot(meve)
# Map the locations of the tree ring chronologies
plot(ITRDB$metadata$geometry, pch = 1, add = TRUE)
legend("bottomleft", pch = 1, legend = "ITRDB chronologies")
}
Run the code above in your browser using DataLab