if (ok_proj6()) {
proj_trans(cbind(147, -42), "+proj=laea", source = "OGC:CRS84")
proj_trans(cbind(147, -42), z_ = -2, "+proj=laea", source = "OGC:CRS84")
proj_trans(cbind(147, -42), z_ = -2, t_ = 1, "+proj=laea", source = "OGC:CRS84")
}
Run the code above in your browser using DataLab