# NOT RUN {
# Load Gorilla data
data("gorillas", package = "inlabru")
# Take the mesh and transform it to latitude/longitude
tmesh <- stransform(gorillas$mesh, crs = CRS("+proj=longlat"))
# Compare original and transformed mesh
multiplot(
ggplot() +
gg(gorillas$mesh) +
ggtitle("Original mesh"),
ggplot() +
gg(tmesh) +
ggtitle("Transformed mesh")
)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab