# \donttest{
data("ATC_Tree_UpperBound_2024")
data("FAERS_myopathy")
DistributionApproximationResults_size2 = DistributionApproximation(epochs = 10,
ATCtree = ATC_Tree_UpperBound_2024, observations = FAERS_myopathy, Smax = 2)
DistributionApproximationResults_size3 = DistributionApproximation(epochs = 10,
ATCtree = ATC_Tree_UpperBound_2024, observations = FAERS_myopathy, Smax = 3)
score_distribution_list = list(DistributionApproximationResults_size2,
DistributionApproximationResults_size3)
cocktails = list(c(561, 904),
c(1902, 4585))
p_value_cocktails(score_distribution_list, cocktails, ATC_Tree_UpperBound_2024,
FAERS_myopathy)
# }
Run the code above in your browser using DataLab