Distribuzione per età della popolazione in una certa città / Age distribution of the population in a certain city
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, 15, 25, 55, 65, 100] P=[ 18, 16.5, 50, 10, 5.5]; 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; bX = 100; aY = 0; bY = 2/100 Dx = 0; Dy = 0 ... Cax="white" C1="black" L1x=LLx; L1y=LLy ... AX=BX=AY=BY="" ... T0=["0",0,-0.001]; T1=["15",15,-0.001]; T2=["25",25,-0.001]; T3=["55",55,-0.001]; T4=["65",65,-0.001]; T5=["100",100,-0.001] s0=["18%",6.5,0.018]; s1=["16.5%",21,0.018]; s2=["50%",(25+55)/2,0.018]; s3=["10%",60,0.018]; s4=["5.5%",165/2,0.018] ... Co1="lightgrey" // Per un'ulteriore griglia (puoi cambiare colore) / to have an additional grid (you can change color) Cgr2 = Cgr; xx1=[];yy1=[0] Cgr2="black"