This allows the user to set a threshold for velocity and remove anything classed as a blink as a result
Usage
detect_blinks_by_velocity(
data,
pupil,
threshold = 0.1,
extend_forward = 0,
extend_back = 0
)Examples
Sdata <- make_pupillometryr_data(data = pupil_data,
subject = ID,
trial = Trial,
time = Time,
condition = Type)
Sdata2 <- detect_blinks_by_velocity(data = Sdata,
pupil = LPupil,
threshold = 0.1,
extend_forward = 0,
extend_back = 0)
#> Creating column pupil_in_blink