Ive created this function to take samples from a random set of numbers that R generates and then compute the mean, standard deviation, and a confidence interval for those nu