#code below was used to create six_panels data set
## Not run:
# set.seed(1944)
# adpcr1 <- sim_adpcr(m = 10, n = 765, times = 10000, pos_sums = FALSE, n_panels = 2)
# adpcr2 <- sim_adpcr(m = 40, n = 765, times = 10000, pos_sums = FALSE, n_panels = 2)
# adpcr2 <- rename_dpcr(adpcr2, exper = "Experiment2")
# adpcr3 <- sim_adpcr(m = 100, n = 765, times = 10000, pos_sums = FALSE, n_panels = 2)
# adpcr3 <- rename_dpcr(adpcr3, exper = "Experiment3")
# bind_dpcr(adpcr1, adpcr2, adpcr3)
# ## End(Not run)
Run the code above in your browser using DataLab