# NOT RUN {
r <- rast()
is.lonlat(r)
is.lonlat(r, global=TRUE)
crs(r) <- ""
is.lonlat(r)
is.lonlat(r, perhaps=TRUE, warn=FALSE)
crs(r) <- "+proj=lcc +lat_1=48 +lat_2=33 +lon_0=-100 +ellps=WGS84"
is.lonlat(r)
# }
Run the code above in your browser using DataLab