pass on params_247 to g.part5.savetimeseries

wadpac · Oct 31, 2023 · e730204 · e730204
1 parent 27fd394
commit e730204
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 3 deletions.
diff --git a/R/g.part5.R b/R/g.part5.R
@@ -584,7 +584,8 @@ g.part5 = function(datadir = c(), metadatadir = c(), f0=c(), f1=c(),
                                            save_ms5raw_without_invalid = params_output[["save_ms5raw_without_invalid"]],
                                            DaCleanFile = DaCleanFile,
                                            includedaycrit.part5 = params_cleaning[["includedaycrit.part5"]], ID = ID,
-                                           sep_reports = params_output[["sep_reports"]])
+                                           sep_reports = params_output[["sep_reports"]],
+                                           params_247 = params_247)
                   }
                 }
               }

diff --git a/R/g.part5.savetimeseries.R b/R/g.part5.savetimeseries.R
@@ -3,7 +3,8 @@ g.part5.savetimeseries = function(ts, LEVELS, desiredtz, rawlevels_fname,
                                   save_ms5raw_without_invalid = TRUE,
                                   DaCleanFile = NULL,
                                   includedaycrit.part5 = 2/3, ID = NULL,
-                                  sep_reports = ",") {
+                                  sep_reports = ",",
+                                  params_247 = NULL) {
   ms5rawlevels = data.frame(date_time = ts$time, class_id = LEVELS,
                             # class_name = rep("",Nts),
                             stringsAsFactors = FALSE)

diff --git a/man/g.part5.savetimeseries.Rd b/man/g.part5.savetimeseries.Rd
@@ -13,7 +13,8 @@
                               save_ms5raw_without_invalid = TRUE,
                               DaCleanFile = NULL,
                               includedaycrit.part5 = 2/3,
-                              ID = NULL, sep_reports = ",")
+                              ID = NULL, sep_reports = ",",
+                              params_247 = NULL)
 }
 \arguments{
   \item{ts}{
@@ -53,6 +54,9 @@
     Character (default = ","). Value used as sep argument in \link[utils]{write.csv}
     for writing csv files with the GGIR reports.
   }
+  \item{params_247}{
+    See \link{GGIR}
+  }
 }
 \value{
   Function does not provide output, it only prepare data for saving