From cf03641bdf808c3f9234bbb6b0e9ff91a314d43a Mon Sep 17 00:00:00 2001
From: Anuj Nimkar <animkar@umd.edu>
Date: Fri, 1 Dec 2017 14:25:22 -0800
Subject: [PATCH] Update AnomalyDetection.R

Add a seconds value (3600) on line 170.
---
 R/ts_anom_detection.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/R/ts_anom_detection.R b/R/ts_anom_detection.R
index a7e3abe..fdc1dfd 100644
--- a/R/ts_anom_detection.R
+++ b/R/ts_anom_detection.R
@@ -167,6 +167,7 @@ AnomalyDetectionTs <- function(x, max_anoms = 0.10, direction = 'pos',
   }
 
   period = switch(gran,
+                  sec = 3600,
                   min = 1440,
                   hr = 24,
                   # if the data is daily, then we need to bump the period to weekly to get multiple examples