# Le distribuzioni delle età dei morti in Italia nel decennio 1881-90 e nel 2006.
source("http://macosa.dima.unige.it/r.R")
HF=3; BF=4.5
freq <- c(3818,343,303,398,360,384,495,1177,708)
interv <- c(0,5,10,20,30,40,50,60,75,100)
histoclas(interv,freq) # o: istoclas(interv,freq)
# la media (pallino marrone) è circa 28.18891
# Per altre statistiche usa il comando altrestat()
HF=1.3; morestat() # o: altrestat()
# Min. 1st Qu. Median Mean 3rd Qu. Max.
# 0.000 2.615 7.553 28.190 57.750 100.000
# I pallini marroni sono 5° e 95° percentile
# Il pallino rosso è la media
#
HF=3; BF=4.5
freq <- c(43,5,22,49,65,144,366,350,518,814,1245,1771,2027,1643,727,195,17)
interv <- c(0,5,10,20,30,40,50,60,65,70,75,80,85,90,95,100,105,110)
histoclas(interv,freq)
# la media (pallino marrone) è circa 28.18891
# Per altre statistiche usa il comando morestat()/altrestat()
HF=1.3; morestat()
# Min. 1st Qu. Median Mean 3rd Qu. Max.
# 0.00 75.50 83.89 81.10 90.25 110.00
# I pallini marroni sono 5° e 95° percentile
# Il pallino rosso è la media