Example in the book

library(sf)
library(terra)
library(tidyterra)
library(dplyr)
library(rnaturalearth)
library(ggplot2)
library(INLA)

projUTM <- "+proj=utm +zone=19 +south +ellps=GRS80 \
            +towgs84=0,0,0,0,0,0,0 +units=km +no_defs"