Could someone help me, please, thank you ! I can only do this, am I doing it wrong?
rm(list=ls())
a = runif(1000,0,1)
b = pnorm(a, mean = 60.5, sd = 0.1)
mean = rep(1,1000)
for(i in 1:1000){
mean[i] = mean(rexp(b,2))
}
n = seq(1, 1000)
plot(mean ~ n)
1 000 numbers 𝑋 ~ 𝑈(𝑎, 𝑏) distribution Then calculate mean from first, first two, first three..., thousand of these random numbers and means and absolute value.