if (ok_proj6()) {
cat(proj_crs_text("OGC:CRS84", format = 0L))
proj_crs_text("OGC:CRS84", format = 1L)
south55 <- "+proj=utm +zone=55 +south +ellps=GRS80 +units=m +no_defs +type=crs"
proj_crs_text(proj_crs_text(south55), 1L)
}
Run the code above in your browser using DataLab