if (grassStarted()) {
# Setup
library(terra)
# Example data
madElev <- fastData("madElev")
# Convert a SpatRaster to a GRaster
elev <- fast(madElev)
# Create longitude/latitude rasters
ll <- longlat(elev)
ll # note units of cell values!
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.