R: построение дискретного равномерного распределения с широкими столбиками

Question

У меня есть следующий код R:

library(extraDistr)

x <- rdunif(100, 1, 6)
barplot(x, xlab="x", ylab="P(X=x)", ylim=c(0, 0.2))

Он генерирует график, который выглядит следующим образом:

НоМне нужен график, который выглядит следующим образом (но с барами, которые имеют одинаковую высоту (все 1/6) и xlim = c (1, 6)):

Как сделать график, который я ищу?

Answer 1

нужно сделать barplot(prop.table(table(x)))