Calculate mean binocular pupil size
Usage
mean_gazepoint_pupil(
master_df,
lp_col = "LPupil",
rp_col = "RPupil",
output_col = "mean_pupil",
min_eyes = 1
)Examples
pupil <- data.frame(
LPupil = c(3, NA, 4),
RPupil = c(3.2, 3.5, NA)
)
mean_gazepoint_pupil(pupil)
#> LPupil RPupil mean_pupil
#> 1 3 3.2 3.1
#> 2 NA 3.5 3.5
#> 3 4 NA 4.0
