validation_data <- rnorm(1e3, mean = 100, sd = 10)
probs_interest <- c(1-1e-6, 1-1e-7)
bootstrap_size <- 1000
bootstrap_validation_sims <- 100
maxk_line <- c(100, 125, 150)
estimated_quants <- RESTK_validation(validation_data = validation_data,
maxk_line = maxk_line,
probs_interest = probs_interest,
bootstrap_size = bootstrap_size,
bootstrap_validation_sims = bootstrap_validation_sims)
Run the code above in your browser using DataLab