tree score

library(sf)

## Linking to GEOS 3.9.1, GDAL 3.4.3, PROJ 7.2.1; sf_use_s2() is TRUE

library(ggplot2)

tree_score <- st_read(dsn="D:/tx_tree_score/tx.shp")

## Reading layer `tx' from data source `D:\tx_tree_score\tx.shp' using driver `ESRI Shapefile'
## Simple feature collection with 11886 features and 33 fields
## Geometry type: MULTIPOLYGON
## Dimension:     XY
## Bounding box:  xmin: -1000125 ymin: 313388.1 xmax: 219886.2 ymax: 1379350
## Projected CRS: NAD83 / Conus Albers

tree_score <- tree_score[tree_score$county=='Travis County',]

tree_score<-st_transform(tree_score,crs = 4326)


ggplot(data = tree_score) +
  geom_sf(aes(fill = tesctyscor))+
  scale_fill_viridis_c(trans = "sqrt", alpha = .4)