平均數與標準差
Author: 藍邦偉 老師

拉動n決定母體個數，拉動s重新計算亂數

顯示順序

顯示分數

平均數與標準差

a = Random(0.0, 10.0)
b = Random(0.0, 10.0)
s = -1.2 (slider from -5 to 4, step 0.1)
r: 7.0 * random() + s * 0.0
t: random() * 2.0 * 3.141592653589793 + s * 0.0
n = 20 (slider from -5 to 20, step 1)
list_a = Sequence(((7.0 * random() + s * 0.0) * cos(random() * 2.0 * 3.141592653589793 + s * 0.0), (7.0 * random() + s * 0.0) * sin(random() * 2.0 * 3.141592653589793 + s * 0.0)), i, 1.0, n)
list_b = Sequence(5.0 - floor(Distance[(0.0, 0.0), Element[list_a, k]]), k, 1.0, n)
list_c = Sequence(If[Element[list_b, i] > 0.0, Element[list_b, i], 0.0], i, 1.0, n)
list_d = Sequence(Text["" + (i), Element[list_a, i]], i, 1.0, n)
list_e = Sequence(Text["" + (Element[list_c, i]), Element[list_a, i]], i, 1.0, n)
集合2 = Sequence(CountIf[x ≟ i, list_c], i, 0.0, 5.0)
μ = Mean(list_c)
σ = SD(list_c)
c = false
d = false
O: 0.5 * (Corner[1.0] + Corner[3.0])
集合1 = Sequence(Circle[O, i], i, 1.0, 5.0)
文字1: "算術平均數μ=" + μ
文字2: "標準差σ=" + σ
C_1 = Circle(O, 5.0)
C_2 = Circle(O, 4.0)
C_3 = Circle(O, 3.0)
C_4 = Circle(O, 2.0)
C_5 = Circle(O, 1.0)