# NOT RUN {
# Load example data
data("Pupilex4")
# Writing log file to temporary folder for the example
dat <- clean_artifact(Pupilex4, MADWindow = 100, MADConstant = 2,
MADPadding = c(200, 200), MahaConstant = 2,
Method = "Robust", XandY = TRUE, Second = TRUE,
MaxValueRun = 5, NAsAroundRun = c(2,2),
LogFile = paste0(tempdir(),"/ArtifactCleanupLog.rds"))
# Please see the vignettes for detailed example usage.
# vignette("PupilPre_Cleanup", package="PupilPre")
# }
Run the code above in your browser using DataLab