Ошибки в гистограмме R

Question

Может кто-нибудь понять, почему этот блок кода не производит гистограмму? Вот код:

incremental <- c()
for (i in 1:1000) {
  set.seed(42)
  avg_2 = mean(runif(100)) 
  incremental <- rbind(incremental, c(avg_2))
}

incremental <- as.numeric(incremental)
hist(incremental, main = "Histogram of Averages From For Loop",
     xlab = "Averages")

Не беспокойтесь о set.seed, это часть упражнения. Все точки данных будут одинаковыми, но на гистограмме ничего не отображается. Почему это так? Вот скриншот гистограммы:

Answer 1

На самом деле, вы просто смотрите на сюжет с одним большим баром. R (или кому-либо еще) очень трудно угадать, где создавать разрывы, если вы наблюдаете только одно значение. Может быть, вы хотите что-то вроде этого:

hist(incremental, main = "Histogram of Averages From For Loop", 
    xlab = "Averages", 
    breaks=seq(0,1, length.out=10))

Это говорит hist() создать 10 разрывов в диапазоне от 0 до 1.