居住分布模拟：正态分布与概率统计可视化

GeoGebra 命令及参数

1. Sequence(1, n, 1, 30) → one
2. Sequence(2, n, 1, 8) → two
3. Join({one, two, eight}) → list1
4. Shuffle(list1) → list2
5. If(B2 + C1 ≤ 10, B2 + C1, C1) → C2
6. If(B3 + C2 ≤ 10, B3 + C2, C2) → C3
7. If(B4 + C3 ≤ 10, B4 + C3, C3) → C4
8. If(B5 + C4 ≤ 10, B5 + C4, C4) → C5
9. If(B6 + C5 ≤ 10, B6 + C5, C5) → C6
10. If(B7 + C6 ≤ 10, B7 + C6, C6) → C7
11. If(B8 + C7 ≤ 10, B8 + C7, C7) → C8
12. If(B9 + C8 ≤ 10, B9 + C8, C8) → C9
13. If(B10 + C9 ≤ 10, B10 + C9, C9) → C10
14. If(B11 + C10 ≤ 10, B11 + C10, C10) → C11
15. If(B12 + C11 ≤ 10, B12 + C11, C11) → C12
16. If(B13 + C12 ≤ 10, B13 + C12, C12) → C13
17. If(B14 + C13 ≤ 10, B14 + C13, C13) → C14
18. If(B15 + C14 ≤ 10, B15 + C14, C14) → C15
19. If(B16 + C15 ≤ 10, B16 + C15, C15) → C16
20. If(B17 + C16 ≤ 10, B17 + C16, C16) → C17
21. If(B18 + C17 ≤ 10, B18 + C17, C17) → C18
22. If(B19 + C18 ≤ 10, B19 + C18, C18) → C19
23. If(B20 + C19 ≤ 10, B20 + C19, C19) → C20
24. If(C2 ≟ C1, 0, If[C2 ≤ 10, 1, 0]) → D2
25. If(C3 ≟ C2, 0, If[C3 ≤ 10, 1, 0]) → D3
26. If(C4 ≟ C3, 0, If[C4 ≤ 10, 1, 0]) → D4
27. If(C5 ≟ C4, 0, If[C5 ≤ 10, 1, 0]) → D5
28. If(C6 ≟ C5, 0, If[C6 ≤ 10, 1, 0]) → D6
29. If(C7 ≟ C6, 0, If[C7 ≤ 10, 1, 0]) → D7
30. If(C8 ≟ C7, 0, If[C8 ≤ 10, 1, 0]) → D8
31. If(C9 ≟ C8, 0, If[C9 ≤ 10, 1, 0]) → D9
32. If(C10 ≟ C9, 0, If[C10 ≤ 10, 1, 0]) → D10
33. If(C11 ≟ C10, 0, If[C11 ≤ 10, 1, 0]) → D11
34. If(C12 ≟ C11, 0, If[C12 ≤ 10, 1, 0]) → D12
35. If(C13 ≟ C12, 0, If[C13 ≤ 10, 1, 0]) → D13
36. If(C14 ≟ C13, 0, If[C14 ≤ 10, 1, 0]) → D14
37. If(C15 ≟ C14, 0, If[C15 ≤ 10, 1, 0]) → D15
38. If(C16 ≟ C15, 0, If[C16 ≤ 10, 1, 0]) → D16
39. If(C17 ≟ C16, 0, If[C17 ≤ 10, 1, 0]) → D17
40. If(C18 ≟ C17, 0, If[C18 ≤ 10, 1, 0]) → D18
41. If(C19 ≟ C18, 0, If[C19 ≤ 10, 1, 0]) → D19
42. If(C20 ≟ C19, 0, If[C20 ≤ 10, 1, 0]) → D20
43. If(B21 + C20 ≤ 10, B21 + C20, C20) → C21
44. If(C21 ≟ C20, 0, If[C21 ≤ 10, 1, 0]) → D21
45. If(B22 + C21 ≤ 10, B22 + C21, C21) → C22
46. If(C22 ≟ C21, 0, If[C22 ≤ 10, 1, 0]) → D22
47. If(B23 + C22 ≤ 10, B23 + C22, C22) → C23
48. If(C23 ≟ C22, 0, If[C23 ≤ 10, 1, 0]) → D23
49. If(B24 + C23 ≤ 10, B24 + C23, C23) → C24
50. If(C24 ≟ C23, 0, If[C24 ≤ 10, 1, 0]) → D24
51. If(B25 + C24 ≤ 10, B25 + C24, C24) → C25
52. If(C25 ≟ C24, 0, If[C25 ≤ 10, 1, 0]) → D25
53. If(B26 + C25 ≤ 10, B26 + C25, C25) → C26
54. If(C26 ≟ C25, 0, If[C26 ≤ 10, 1, 0]) → D26
55. If(B27 + C26 ≤ 10, B27 + C26, C26) → C27
56. If(C27 ≟ C26, 0, If[C27 ≤ 10, 1, 0]) → D27
57. If(B28 + C27 ≤ 10, B28 + C27, C27) → C28
58. If(C28 ≟ C27, 0, If[C28 ≤ 10, 1, 0]) → D28
59. If(B29 + C28 ≤ 10, B29 + C28, C28) → C29
60. If(C29 ≟ C28, 0, If[C29 ≤ 10, 1, 0]) → D29
61. If(B30 + C29 ≤ 10, B30 + C29, C29) → C30
62. If(C30 ≟ C29, 0, If[C30 ≤ 10, 1, 0]) → D30
63. If(B31 + C30 ≤ 10, B31 + C30, C30) → C31
64. If(C31 ≟ C30, 0, If[C31 ≤ 10, 1, 0]) → D31
65. If(B32 + C31 ≤ 10, B32 + C31, C31) → C32
66. If(C32 ≟ C31, 0, If[C32 ≤ 10, 1, 0]) → D32
67. If(B33 + C32 ≤ 10, B33 + C32, C32) → C33
68. If(C33 ≟ C32, 0, If[C33 ≤ 10, 1, 0]) → D33
69. If(B34 + C33 ≤ 10, B34 + C33, C33) → C34
70. If(C34 ≟ C33, 0, If[C34 ≤ 10, 1, 0]) → D34
71. If(B35 + C34 ≤ 10, B35 + C34, C34) → C35
72. If(C35 ≟ C34, 0, If[C35 ≤ 10, 1, 0]) → D35
73. If(B36 + C35 ≤ 10, B36 + C35, C35) → C36
74. If(C36 ≟ C35, 0, If[C36 ≤ 10, 1, 0]) → D36
75. If(B37 + C36 ≤ 10, B37 + C36, C36) → C37
76. If(C37 ≟ C36, 0, If[C37 ≤ 10, 1, 0]) → D37
77. If(B38 + C37 ≤ 10, B38 + C37, C37) → C38
78. If(C38 ≟ C37, 0, If[C38 ≤ 10, 1, 0]) → D38
79. If(B39 + C38 ≤ 10, B39 + C38, C38) → C39
80. If(C39 ≟ C38, 0, If[C39 ≤ 10, 1, 0]) → D39
81. Sum(D1:D39) → E1
82. DotPlot(data, false, 0.15) → list3