workshop-scripts/gis-visualization/spring-2019/R/import-data.R at master · spatialanalysis/workshop-scripts · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
library(sf)

wards <- read_sf("data/ward1998.shp")
wards
plot(wards)

wards_utm <- st_transform(wards, 32616)
wards_stateplane <- st_transform(wards, 3435)

wards_utm
wards_stateplane

plot(st_geometry(wards_utm))
plot(st_geometry(wards_stateplane))