# Bretz et al. (2009)
bonferroni(hypotheses = rep(1 / 3, 3))
# Bretz et al. (2009)
bonferroni_holm(hypotheses = rep(1 / 3, 3))
# Huque et al. (2011)
huque_etal()
# Wiens (2003)
fallback(hypotheses = rep(1 / 3, 3))
# Wiens and Dmitrienko (2005)
fallback_improved_1(hypotheses = rep(1 / 3, 3))
# Bretz et al. (2009)
fallback_improved_2(hypotheses = rep(1 / 3, 3))
# Maurer et al. (1995); Westfall and Krishen (2001)
fixed_sequence(num_hyps = 3)
# Figure 1 in Bretz et al. (2011)
simple_successive_1()
# Figure 4 in Bretz et al. (2011)
simple_successive_2()
# Create a random graph with three hypotheses
random_graph(num_hyps = 3)
# Figure 6 in Xi and Bretz et al. (2019)
two_doses_two_primary_two_secondary()
# Add another dose to Figure 6 in Xi and Bretz et al. (2019)
three_doses_two_primary_two_secondary()
Run the code above in your browser using DataLab