# View the example triangle with downward corrections
example_downward_corr_rt
# Estimate delay with and without preprocessing
delay_raw <- estimate_delay(example_downward_corr_rt, n = 5)
delay_processed <- estimate_delay(
preprocess_negative_values(example_downward_corr_rt),
n = 5
)
# Compare the resulting PMFs
delay_raw
delay_processed
Run the code above in your browser using DataLab