Hi Luiz,
Sorry, I forgot the details in the last 2 days :-/
What do you do differently from this?
GNIPDataBRagg <- prepsources(data = GNIPData, long_min = -80, long_max = -35, lat_min = -35, lat_max = 5, col_source_ID = "source_ID")
BRFit <- isofit(data = GNIPDataBRagg, mean_model_fix = list(elev = TRUE, lat_abs = TRUE))
getelev(filename = "MDE_Brasil2.tif", long_min = -80, long_max = -35, lat_min = -35, lat_max = 5, z = 3, overwrite = TRUE)
elev_BR2 <- raster::raster("MDE_Brasil2.tif")
elev_BR2_prepared <- prepraster(elev_BR2, isofit = BRFit)
BRIsoscape2 <- isoscape(raster = elev_BR2_prepared, isofit = BRFit)
plot(BRIsoscape2, y_title = list(which = TRUE, title = bquote(delta^18 * O)))