if (FALSE) {
df <- data.frame(loc = 1, scale = 0.5, shape = 0.1,
cov_1 = 0.01, cov_2 = 0.001, cov_3 = 0.002,
cov_4 = 0.001, cov_5 = 0.01, cov_6 = 0.001,
cov_7 = 0.002, cov_8 = 0.001, cov_9 = 0.02)
df_cievd(df, p = 0.99, ci = 0.95, cores = 2)
}
Run the code above in your browser using DataLab