st_coordinates()
sf
inla()
old <- theme_set(theme_bw()) ggplot() + geom_sf(data = depmunic) + coord_sf(datum = "EPSG:2100")