2026-02-01 16:33:20 -08:00
|
|
|
func logn n .
|
|
|
|
|
return log n 0
|
|
|
|
|
.
|
2025-06-11 20:16:52 -04:00
|
|
|
numfmt 0 5
|
2023-07-01 11:58:00 -04:00
|
|
|
for i = 1 to 1000
|
2026-02-01 16:33:20 -08:00
|
|
|
a[] &= 1 + 0.5 * sqrt (-2 * logn randomf) * cos (360 * randomf)
|
2023-07-01 11:58:00 -04:00
|
|
|
.
|
2023-12-16 21:33:55 -08:00
|
|
|
for v in a[]
|
|
|
|
|
avg += v / len a[]
|
|
|
|
|
.
|
|
|
|
|
print "Average: " & avg
|
|
|
|
|
for v in a[]
|
|
|
|
|
s += pow (v - avg) 2
|
|
|
|
|
.
|
|
|
|
|
s = sqrt (s / len a[])
|
|
|
|
|
print "Std deviation: " & s
|
