inst/DBNR/envelopes/00_setup.R

In pneuvial/sanssouci: Post Hoc Multiple Testing Inference

library("sansSouci")
file <- system.file("DBNR/envelopes/simu.hulk.R", package = "sansSouci", mustWork = TRUE)
source(file)

ms <- 12800
ss <- rev(c(10, 50, 100, 200, 400))
ds <- c(0.5, 0.75, 0.9, 1)
barmus <- c(2, 3, 4, 5)
K1s <- c(1, 4, 8, 16, 32)
groupeds <- c(TRUE, FALSE)
settings <- c("const", "gauss", "poisson", "rgauss")[4]

configs <- expand.grid(
    m = ms,
    s = ss,
    K1 = K1s,
    d = ds,
    barmu = barmus,
    grouped = groupeds,
    setting = settings, 
    stringsAsFactors = FALSE)

repl <- 2  ## number of replications