Probability with Random Ball Selection: Shuffling and Color Combinations

Probability with Random Ball Selection: Shuffling and Color Combinations
Loading the math board and drawing, please wait…
2021-01-15 10:06
This example demonstrates how random ball selection from a set of colored balls can be visualized to reveal the outcomes and their probability patterns. It centers on core ideas in Probability & Statistics, especially random experiments and equally likely selections, together with Combinatorics for counting/selection logic. Visually, it uses points/segments to place balls around circular or spherical diagram components and uses interactive controls to update the experiment. Construction highlights from the provided GeoGebra summary: Sequence is used to generate index sequences, Shuffle randomizes the order of candidates, If applies selection rules to determine which indices are chosen, and Point/Segment create the geometric placement and connecting visual structure. Collections such as BallBlueList01/BallRedList01 and their randomized counterparts (BlueRandomList/RedRandomList), along with SelectedColourNoList and SelectNoList, store selected indices and color-specific results while variables like NoB and NoS control the total number of balls and the number selected. Suitable for high-school and early undergraduate teaching and self-study on turning a probability problem into a dynamic model that students can experiment with.

GeoGebra Commands & Parameters

  1. Sequence(Circle[Element[Centre00, i], BallRadius], i, 2, NoB + 1) → BallBlueList01
  2. Sequence(Circle[Element[Centre00, i], BallRadius], i, NoB + 2, nb + 1) → BallRedList01
  3. Sequence(i, i, 2, NoB + 1) → BlueList
  4. Sequence(i, i, NoB + 2, nb + 1) → RedList
  5. Shuffle(BlueList) → BlueRandomList
  6. Shuffle(RedList) → RedRandomList
  7. Sequence(If[Element[SelectedColourNoList, i] ≟ 1, Element[BlueRandomList, i], Element[RedRandomList, i]], i, 1, NoS) → SelectNoList
  8. Sequence(Circle[Element[Centre001, i], BallRadiusSmall], i, 2, NoB + 1) → BallBlueList001
  9. Sequence(Circle[Element[Centre001, i], BallRadiusSmall], i, NoB + 2, nb + 1) → BallRedList001
  10. Sequence(Element[Centre00, Element[SelectNoList, i]], i, 1, NoS) → MoveStart
  11. If(a < 5, Element[MoveStart, 1], If[a > 15, C01, (FindCor(a, 5, 15, x(Element[MoveStart, 1]), x(C01)), FindCor(a, 5, 15, y(Element[MoveStart, 1]), y(C01)))]) → C01Move
  12. If(a < 25, Element[MoveStart, 2], If[a > 35, C02, (FindCor(a, 25, 35, x(Element[MoveStart, 2]), x(C02)), FindCor(a, 25, 35, y(Element[MoveStart, 2]), y(C02)))]) → C02Move
  13. If(a < 45, Element[MoveStart, 3], If[a > 55, C03, (FindCor(a, 45, 55, x(Element[MoveStart, 3]), x(C03)), FindCor(a, 45, 55, y(Element[MoveStart, 3]), y(C03)))]) → C03Move
  14. If(a < 65, Element[MoveStart, 4], If[a > 75, C04, (FindCor(a, 65, 75, x(Element[MoveStart, 4]), x(C04)), FindCor(a, 65, 75, y(Element[MoveStart, 4]), y(C04)))]) → C04Move
  15. Sequence(If[Element[SelectedColourNoList, i] ≟ 1, Circle[Element[MoveCentre, i], BallRadius]], i, 1, NoS) → BallBlueSelectedList
  16. Sequence(If[Element[SelectedColourNoList, i] ≟ 2, Circle[Element[MoveCentre, i], BallRadius]], i, 1, NoS) → BallRedSelectedList
  17. Sequence(Circle[Element[MoveStart, i], (Lfactor * BallRadius)], i, 1, NoS) → WhiteCircleList
  18. If(Ball01 ≟ 1, NoOfBlue00 - 1, NoOfBlue00) → NoOfBlue01
  19. If(Ball02 ≟ 1, NoOfBlue01 - 1, NoOfBlue01) → NoOfBlue02
  20. If(Ball03 ≟ 1, NoOfBlue02 - 1, NoOfBlue02) → NoOfBlue03
  21. If(Ball04 ≟ 1, NoOfBlue03 - 1, NoOfBlue03) → NoOfBlue04
  22. If(Ball01 ≟ 2, NoOfRed00 - 1, NoOfRed00) → NoOfRed01
  23. If(Ball02 ≟ 2, NoOfRed01 - 1, NoOfRed01) → NoOfRed02
  24. If(Ball03 ≟ 2, NoOfRed02 - 1, NoOfRed02) → NoOfRed03
  25. If(Ball04 ≟ 2, NoOfRed03 - 1, NoOfRed03) → NoOfRed04
  26. Sequence(If[Element[SelectedColourNoList, i] ≟ 1, Element[NoOfBlue, i], Element[NoOfRed, i]], i, 1, NoS + 1) → NoOfBallNumerator
  27. Point(d) → Z06
  28. Point(c) → Z05
  29. Segment(Z05, Y05) → m
  30. Segment(Z06, Y06) → k
  31. Point(d) → Z07
  32. Point(d) → Z08
  33. Point(d) → Z09
  34. Segment(Z07, Y07) → n
  35. Segment(Z08, Y08) → p
  36. Segment(Z09, Y09) → q

AI Drawing Prompt Reference

Create a visual for a probability experiment: arrange several blue and red balls evenly around a circular area, randomly shuffle and select a few, then move the selected balls to another set of circular positions, marking them with small white circles. Include two sets of rings (large and small) for initial and final positions, connect relevant points with segments to show the selection process, and display counts of selected balls by color. Add a slider to animate the movement and color changes step by step.
The prompt above was compiled from the original drawing commands and is for reference only.