Distribution of scores

# number of times the simulation will run.
B <- 1000
set.seed(1)
# Get the highest score from each random distribution of 10,000 people.
highest_val <- replicate(B, {
  rd_10000 <- sample(rnorm(10000,15,100), B)
  max(rd_10000)
})
hist(highest_val)

I want to use the rnorm to generate a random distribution of 10,000 values with a given average and standard deviation to obtain the max value from a supplied vector by repeating it 1000 times

Hi! I think that if you fix the seed (set.seed()) and supplying a mean and sd of your rnorm() the max will always be the same. What is it that you're trying to accomplish?

This post is a duplicate of one that was already posted:

https://forum.posit.co/t/distribution-of-iq-scores/13109

Both of these questions seem to be homework problems. Please see the community's guide regarding homework problems:

https://forum.posit.co/t/faq-homework-policy/5181/3