design <-
list(NULL, locations = 50L, geometry = "point", c = 20, alpha = 0.050000000000000003, 
    desiredPower = 0.80000000000000004, effect = 0.59999999999999998, 
    yC = 0.40000000000000002, outcome_type = "d", sigma2 = NA, 
    denominator = 1, N = 1, ICC = 0.17499999999999999, cv_percent = NA, 
    sd_h = 0, spillover_interval = 0, contaminate_pop_pr = 0, 
    distance_distribution = "normal")
