for (i in 1:1000 ) {
  x2[i]=mean(runif(7, 0, 1))
}
mean(x2)