# NOT RUN {
library("raster")
library("rgdal")
tahoe_highrez_training_polygons <- readOGR(
dsn=system.file("external", package="spatial.tools"),layer="tahoe_highrez_training")
spplot(tahoe_highrez_training_polygons,zcol="Class")
tahoe_highrez_training_points <- readOGR(
dsn=system.file("external", package="spatial.tools"),layer="tahoe_highrez_training_points")
spplot(tahoe_highrez_training_points,zcol="SPECIES")
tahoe_highrez_training_points_utm <- readOGR(
dsn=system.file("external", package="spatial.tools"),
layer="tahoe_highrez_training_points_utm")
print(projection(tahoe_highrez_training_points_utm))
# }
Run the code above in your browser using DataCamp Workspace