alamo

db=rbinom(n=5, size=30, prob = 0.9)
db

## [1] 26 28 24 27 26

barplot(db)

summary(db)

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    24.0    26.0    26.0    26.2    27.0    28.0