library(RegionalCurve) library(patchwork)
regions = c("Minnesota Eastern", "Minnesota Western") MN_width <- region_dimension_graph(regions, "width") MN_depth <- region_dimension_graph(regions, "depth") MN_area <- region_dimension_graph(regions, "area")
MN_width / MN_depth / MN_area
regions_4 = c("Minnesota Eastern", "Minnesota Western", "Southern Driftless", "Lower Southern Driftless") dimension_types_4 = c("width", "depth", "area") p <- region_graph(regions_4, dimension_types_4) p
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.