# NOT RUN {
# Load example data
data("Pupilex3")
# Writing log file to temporary folder for the example
dat <- clean_blink(Pupilex3, BlinkPadding = c(100, 100), Delta = 5,
MaxValueRun = 5, NAsAroundRun = c(2,2),
LogFile = paste0(tempdir(),"/BlinkCleanupLog.rds"))
# Please see the vignettes for detailed example usage.
# vignette("PupilPre_Cleanup", package="PupilPre")
# }
Run the code above in your browser using DataLab