# To run the code with default parameters just call the function:
if (FALSE) result <- simulate_confint_fit()
# To apply different settings, provide them to the simulator function, like such:
result <- simulate_confint_fit(iter = 5, nsample = 5)
Run the code above in your browser using DataLab