El siguiente documento ilustra…..

x=rbinom(n = 100, size = 10, prob = 0.5)
barplot(table(x)) #?????