# NOT RUN {
data(ameslab)
plot(ameslab$profile[[1]]$V1)
chumbley_non_random(ameslab$profile[[1]], ameslab$profile[[2]])
res14 <- fixed_width_no_modeling(ameslab$profile[[1]], ameslab$profile[[4]])
res14$dist_pval
# }
Run the code above in your browser using DataLab