library(sf)
# When we read this in we see basic info regarding the CRS
fire <- st_read("data/source/fire/ca3658211879520210912_20191118_20211117_burn_bndy.shp")
# Let's take a more detailed look at the CRS information.
# We see the WKT (Well Known Text) format which defines the parameters of the projection.
st_crs(fire)
# The preferable way of identifying a CRS is by using a character string with the authority:code.
# We can also just access information about a CRS using st_crs()
st_crs("EPSG:3310")
