set.seed(123)
x1 <- rnorm(500, mean = 0, sd = 1)
CVMgof2(x1, dist = "norm", mean = 0, sd = 1)
x2 <- rexp(500, rate = 2)
CVMgof2(x2, dist = "exp", rate = 2)
x3 <- runif(200, min = -1, max = 3)
CVMgof2(x3, dist = "unif", min = -1, max = 3)
Run the code above in your browser using DataLab