-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path03_testSourceScript.R
More file actions
25 lines (12 loc) · 1.01 KB
/
03_testSourceScript.R
File metadata and controls
25 lines (12 loc) · 1.01 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
setwd("/Users/benjaminglass/HF21-Scripts")
source("00_projectFunctions.R")
source("getStatsf.R")
RasterClipbyFFP("FFP.hr.lines.96.11.csv",307,.75,"Lidar_CHM_2019.tif","/Users/benjaminglass/Desktop/HF21/00_Datasets/00-spatial-deliverables/LIDAR_CHM_rasters")
RasterClipbyFFP("FFP.hr.lines.96.11.csv",307,.75,"ConiferProportionMegaPlot.tif","/Users/benjaminglass/Desktop/HF21/00_Datasets/00-spatial-deliverables/Megaplot_rasters")
RasterClipbyFFP("FFP.hr.lines.96.11.csv",307,.75,"DecidiousProportionMegaPlot.tif","/Users/benjaminglass/Desktop/HF21/00_Datasets/00-spatial-deliverables/Megaplot_rasters")
RasterClipbyFFP("FFP.hr.lines.96.11.csv",307,.75,"NLCD_2016_utm_clipped.tif","/Users/benjaminglass/Desktop/HF21/00_Datasets/00-spatial-deliverables/NLCD_rasters")
test <- RasterClipbyFFP("FFP.hr.lines.96.11.csv",307,.75,"SoilDrainage(0-ND)_utm.tif","/Users/benjaminglass/Desktop/HF21/00_Datasets/00-spatial-deliverables/SoilDrainage_rasters")
#turns the SoilDrainage 0 values to NA
test[test == 0] <- NA
test
getStats(test)