Merge pull request #964 from wadpac/issue943_NoteChecksStrategyDate

address NOTE in checks related to exampledates in g.conv.actlog
wadpac · Nov 5, 2023 · 0a330fc · 0a330fc
2 parents ce4257c + 87cd540
commit 0a330fc
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/g.conv.actlog.R b/R/g.conv.actlog.R
@@ -32,6 +32,7 @@ g.conv.actlog = function(qwindow, qwindow_dateformat="%d-%m-%Y", epochSize = 5)
   # find dates
   actlog_vec = unlist(actlog) # turn into vector
   actlog_vec = sapply(actlog_vec, function(x) !all(is.na(as.Date(as.character(x),format=qwindow_dateformat))))
+  exampledates = unlist(actlog)[which(actlog_vec == TRUE)]
   Ndates = length(which(actlog_vec == TRUE))
   dim(actlog_vec) = c(nrow(actlog),ncol(actlog))
   # create new qwindow object to archive all extracted information