Sull'asse verticale è rappresentata la frequenza percentuale unitaria (o densità)
On the y axis, the unitary percentage frequency (or density) is represented
(that is the percentage frequencies divided by the amplitude of each interval).
You can round the mean (taking into account the width of the intervals).

Puoi aprire il codice e modificare la funzione: vedi l'Help
You can open the Code and modify the function: see the Help
HELP

// I: estremi degli intervalli, P: frequenze
I=[0.95,1.05,1.15,1.25,1.35,1.45,1.55,1.65,1.75,1.85,1.95,2.05,2.15,2.25,2.35]
P=[    2,   0,   0,   6,  26,  41,  62,  60,  36,  19,   3,   0,   2,   2]; NP=P.length
SUM=0; for(i=0;i<NP;i=i+1)  {SUM=SUM+P[i]}
mean=0; for(i=0;i<NP;i=i+1) {mean=mean+P[i]*(I[i]+I[i+1])/2}; mean=mean/SUM
Tot=0; for(i=0;i<NP;i=i+1) {Tot=Tot+P[i]}; for(i=0;i<NP;i=i+1) {P[i]=P[i]/Tot/(I[i+1]-I[i])}
LLx=[]; j=0; for(i=1;i<=NP;i=i+1) { LLx[j]=I[i-1]; LLx[j+1]=I[i-1]; LLx[j+2]=I[i]; LLx[j+3]=I[i]; j=j+4 }
LLy=[]; j=0; for(i=1;i<=NP;i=i+1) { LLy[j]=0; LLy[j+1]=P[i-1]; LLy[j+2]=P[i-1]; LLy[j+3]=0; j=j+4 }

aX = 0.9; bX = 2.4; aY = 0; bY = 2.5
Dx = 0.1; Dy = 0.1
XX=[1,1.5,2]; YY=[1,1.5,2]

function f(x) { y = 1/0; return y }
...
yy=YY; xx=XX
Q1x=[mean]; Q1y=[0]
C1="black"
L1x=LLx; L1y=LLy
...
AX=BX=AY=BY=""
BY = "Tot="+Tot;  AY = "mean="+mean
AAX=aX; BBX=bX; AAY=aY; BBY=bY