# NOT RUN {
print(fdhs)
plot(fdhs, axes=TRUE, main="Projection: longitude/latitude")
fdhs2 <- changeproj(fdhs,
"+proj=utm +zone=30 +ellps=WGS84 +datum=WGS84 +units=m +no_defs")
print(fdhs2)
dev.new()
plot(fdhs2, axes=TRUE, main="Projection: UTM Zone 30")
# }
Run the code above in your browser using DataCamp Workspace