Statistics/Normal distribution: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: added a function name to the REXX section header.) |
|||
Line 2,847: | Line 2,847: | ||
The blank lines in the output are where the number of samples is too small to even merit a single unit on the histogram. |
The blank lines in the output are where the number of samples is too small to even merit a single unit on the histogram. |
||
=={{header|VBA}}== |
|||
<lang vb>Public Sub standard_normal() |
|||
Dim s() As Variant, bins(71) As Single |
|||
ReDim s(20000) |
|||
For i = 1 To 20000 |
|||
s(i) = WorksheetFunction.Norm_S_Inv(Rnd()) |
|||
Next i |
|||
For i = -35 To 35 |
|||
bins(i + 36) = i / 10 |
|||
Next i |
|||
Debug.Print "sample size"; UBound(s), "mean"; mean(s), "standard deviation"; standard_deviation(s) |
|||
t = WorksheetFunction.Frequency(s, bins) |
|||
For i = -35 To 35 |
|||
Debug.Print Format((i - 1) / 10, "0.00"); |
|||
Debug.Print "-"; Format(i / 10, "0.00"), |
|||
Debug.Print String$(t(i + 36, 1) / 10, "X"); |
|||
Debug.Print |
|||
Next i |
|||
End Sub</lang>{{out}} |
|||
<pre>sample size 20000 mean-5,26306310478751E-03 standard deviation 1,00355037427319 |
|||
-3,60--3,50 |
|||
-3,50--3,40 |
|||
-3,40--3,30 |
|||
-3,30--3,20 |
|||
-3,20--3,10 |
|||
-3,10--3,00 |
|||
-3,00--2,90 XX |
|||
-2,90--2,80 X |
|||
-2,80--2,70 XX |
|||
-2,70--2,60 XX |
|||
-2,60--2,50 XXX |
|||
-2,50--2,40 XXXX |
|||
-2,40--2,30 XXXXX |
|||
-2,30--2,20 XXXXXXXX |
|||
-2,20--2,10 XXXXXXXX |
|||
-2,10--2,00 XXXXXXXXXXX |
|||
-2,00--1,90 XXXXXXXXXXXXX |
|||
-1,90--1,80 XXXXXXXXXXXXXXX |
|||
-1,80--1,70 XXXXXXXXXXXXXXXX |
|||
-1,70--1,60 XXXXXXXXXXXXXXXXXXXX |
|||
-1,60--1,50 XXXXXXXXXXXXXXXXXXXXXXXX |
|||
-1,50--1,40 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-1,40--1,30 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-1,30--1,20 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-1,20--1,10 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-1,10--1,00 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-1,00--0,90 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,90--0,80 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,80--0,70 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,70--0,60 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,60--0,50 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,50--0,40 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,40--0,30 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,30--0,20 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,20--0,10 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
-0,10-0,00 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,00-0,10 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,10-0,20 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,20-0,30 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,30-0,40 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,40-0,50 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,50-0,60 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,60-0,70 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,70-0,80 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,80-0,90 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
0,90-1,00 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,00-1,10 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,10-1,20 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,20-1,30 XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,30-1,40 XXXXXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,40-1,50 XXXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,50-1,60 XXXXXXXXXXXXXXXXXXXXXXXXX |
|||
1,60-1,70 XXXXXXXXXXXXXXXXXXXXXX |
|||
1,70-1,80 XXXXXXXXXXXXXXXXXX |
|||
1,80-1,90 XXXXXXXXXXXXXXX |
|||
1,90-2,00 XXXXXXXXXXX |
|||
2,00-2,10 XXXXXXXXXXXX |
|||
2,10-2,20 XXXXXXX |
|||
2,20-2,30 XXXXXX |
|||
2,30-2,40 XXXXX |
|||
2,40-2,50 XXX |
|||
2,50-2,60 XXXX |
|||
2,60-2,70 XX |
|||
2,70-2,80 XX |
|||
2,80-2,90 X |
|||
2,90-3,00 X |
|||
3,00-3,10 X |
|||
3,10-3,20 X |
|||
3,20-3,30 |
|||
3,30-3,40 |
|||
3,40-3,50 </pre> |
|||
=={{header|zkl}}== |
=={{header|zkl}}== |
||
{{trans|Go}} |
{{trans|Go}} |