pass maxAllowedCorruptBlocks into readAxivity

wadpac · Dec 5, 2023 · 1f85a1b · 1f85a1b
1 parent de3f4fa
commit 1f85a1b
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 3 deletions.
diff --git a/R/readAxivity.R b/R/readAxivity.R
@@ -1,10 +1,10 @@
 readAxivity = function(filename, start = 0, end = 0, progressBar = FALSE, desiredtz = "",
                        configtz = c(), interpolationType = 1, loadbattery = FALSE,
-                       header = NULL, frequency_tol = 0.1) {
+                       header = NULL, frequency_tol = 0.1,
+                       maxAllowedCorruptBlocks = 20) {
   if (length(configtz) == 0) configtz = desiredtz
   blockBytes = 512
   headerBytes = 1024
-  maxAllowedCorruptBlocks = 20 # max number consecutive blocks with a failed checksum that we'll tolerate
 
   # Credits: The original version of this code developed outside GitHub was 
   # contributed by Dr. Evgeny Mirkes (Leicester University, UK)

diff --git a/man/readAxivity.Rd b/man/readAxivity.Rd
@@ -9,7 +9,7 @@
 \usage{
   readAxivity(filename, start = 0, end = 0, progressBar = FALSE, 
     desiredtz = "", configtz = c(), interpolationType=1, loadbattery = FALSE,
-    header = NULL, frequency_tol = 0.1)
+    header = NULL, frequency_tol = 0.1, maxAllowedCorruptBlocks = 20)
 }
 \arguments{
   \item{filename}{
@@ -55,6 +55,9 @@
     differs by more than 5\%, but if this is less than frequency_tol the block will
     not be imputed.
   }
+  \item{maxAllowedCorruptBlocks}{
+    Max number of consecutive blocks with a failed checksum that we'll tolerate.
+  }
   
 }
 \value{