Data Science, Statistics, Analytics, Experiment, Causality.
p < 0.05 on each week p_values[,.(num_significant = sum(p_value < 0.05)), by = week] mean(p_values[,.(num_significant = sum(p_value < 0.05)), by = week]$num_significant) # number of ever reaching p < 0.05 on any given week length(p_values[p_value < 0.05, unique(simulation)]) # number of getting p <