also allow for max sib duration

wadpac · Jul 11, 2024 · 77b797d · 77b797d
1 parent bb69b68
commit 77b797d
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/g.part5.analyseRest.R b/R/g.part5.analyseRest.R
@@ -63,6 +63,7 @@ g.part5.analyseRest = function(sibreport = NULL, dsummary = NULL,
   }
   longboutsi = which((sibreport$type == "sib" &
                         sibreport$duration >= possible_nap_dur[1] &
+                        sibreport$duration < possible_nap_dur[2] &
                         sibreport$acc_edge <= possible_nap_edge_acc) |
                        (sibreport$type != "sib" & sibreport$duration >= 1))
   # for qc purposes: