Update L1_normalize.qmd

COMPASS-DOE · Dec 20, 2023 · dc33ed7 · dc33ed7
1 parent 26cd0fd
commit dc33ed7
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/synoptic/L1_normalize.qmd b/synoptic/L1_normalize.qmd
@@ -214,7 +214,8 @@ f <- function(fn, out_dir, design_table) {
  x <- separate(dat, design_link, sep = "-", 
  into = c("What", "Site", "Location", "Sensor"))
  dat$F_OOS <- as.integer(oos(oos_troll, x))
- 
+ smry$`OOS%` <- round(sum(dat$F_OOS) / nrow(dat) * 100, 1)
+
  # Remove unneeded columns unless needed for debugging
  if(!params$debug) {
  message("\tDropping bounds columns")