if (FALSE) {
#run error propagateion on test statistics and
#permuted test statistics
data_obj <- error_prop(data_obj, pairscan_obj, perm = TRUE)
data_obj <- error_prop(data_obj, pairscan_obj, perm = FALSE)
}
Run the code above in your browser using DataLab