Merge pull request #191 from OHI-Science/dev

Dev
OHI-Science · Nov 28, 2018 · 8c060a4 · 8c060a4
2 parents 31400aa + cdedde1
commit 8c060a4
Show file tree

Hide file tree

Showing 4 changed files with 383 additions and 269 deletions.
diff --git a/R/CalculateTrend.R b/R/CalculateTrend.R
@@ -32,6 +32,7 @@ CalculateTrend <- function(status_data, trend_years=trend_years){
   status_data <- status_data %>%
     dplyr::select(region_id, year, status) %>%
     dplyr::filter(year %in% trend_years) %>%
+    dplyr::filter(!is.na(status)) %>%
     unique()
 
   adj_trend_year <- min(trend_years)