Rollup
site_use_param_assessments=rollUp(data=assessments, group_vars=c("IR_MLID","IR_MLNAME","IR_Lat","IR_Long","ASSESS_ID","AU_NAME", "BeneficialUse","R3172ParameterName"), expand_uses=TRUE)
## [1] "Beneficial use assessment category frequencies:"
##
## FS idE idNE NA NS
## 1C 381 23 589 2098 15
## 2A 68 1 94 679 1
## 2B 372 23 639 5867 17
## 3A 2132 52 2784 897 123
## 3B 547 9 488 215 20
## 3C 122 0 109 209 0
## 3D 91 0 176 495 0
## 3E 0 0 0 15 0
## 4 1360 57 2157 3876 65
## [1] "Impaired parameter frequency:"
##
## Aluminum Ammonia
## 16 2
## Arsenic Cadmium
## 11 3
## DO-temperature habitat profile width Minimum Dissolved Oxygen
## 24 6
## pH Temperature, water
## 85 46
## Total Dissolved Solids
## 48
au_use_param_assessments=rollUp(data=assessments, group_vars=c("ASSESS_ID","AU_NAME", "BeneficialUse","R3172ParameterName"), expand_uses=TRUE)
## [1] "Beneficial use assessment category frequencies:"
##
## FS idE idNE NA NS
## 1C 199 12 208 861 12
## 2A 25 1 26 295 1
## 2B 220 16 219 2684 15
## 3A 1257 34 915 375 98
## 3B 312 7 167 93 13
## 3C 70 0 35 86 0
## 3D 49 0 47 126 0
## 3E 0 0 0 8 0
## 4 785 30 793 1721 53
## [1] "Impaired parameter frequency:"
##
## Aluminum Ammonia
## 13 2
## Arsenic Cadmium
## 8 3
## DO-temperature habitat profile width Minimum Dissolved Oxygen
## 19 6
## pH Temperature, water
## 71 33
## Total Dissolved Solids
## 37
au_use_assessments=rollUp(data=assessments, group_vars=c("ASSESS_ID","AU_NAME", "BeneficialUse"), expand_uses=TRUE)
## [1] "Beneficial use assessment category frequencies:"
##
## FS idE idNE NA NS
## 1C 108 11 62 1 11
## 2A 25 1 26 2 1
## 2B 220 16 219 15 15
## 3A 218 24 67 0 76
## 3B 58 7 21 1 12
## 3C 34 0 10 2 0
## 3D 21 0 17 3 0
## 3E 0 0 0 2 0
## 4 251 28 186 0 52
au_assessments=rollUp(data=assessments, group_vars=c("ASSESS_ID","AU_NAME"), expand_uses=TRUE)