library(dplyr)
tn <- tidy_normal(.num_sims = 5)
tb <- tidy_beta(.num_sims = 5)
tidy_distribution_summary_tbl(tn)
tidy_distribution_summary_tbl(tn, sim_number)
data_tbl <- tidy_combine_distributions(tn, tb)
tidy_distribution_summary_tbl(data_tbl)
tidy_distribution_summary_tbl(data_tbl, dist_type)
Run the code above in your browser using DataLab