# \donttest{
# Create some example data first
results <- run_builtin_analysis(scale = "county", year = 2016, include_wwtp = TRUE)
# Save centroids for transition analysis
if ("integrated" %in% names(results) && "nitrogen" %in% names(results$integrated)) {
centroids <- add_centroid_coordinates(results$integrated$nitrogen)
save_centroid_data(centroids, scale = "county", nutrient = "nitrogen")
}
# }
Run the code above in your browser using DataLab