MathPlotAI Logo MathPlotAI

Comparing Boxplots

Comparing Boxplots
Loading the math board and drawing, please wait…
2014-03-23 21:03
Probability & Statistics
This applet provides several pairs of boxplots for students to compare various aspects. Using GeoGebra commands, students can understand the construction and statistical significance of boxplots. Suitable for middle school and above students learning statistics.

GeoGebra Commands & Parameters

  1. Element(BDtSq, Data) → BDat
  2. Q3(BDat) → BQ3
  3. Q1(BDat) → BQ1
  4. KeepIf(BLF ≤ x ≤ BUF, BDat) → BGD
  5. Max(BGD) → BNMax
  6. Min(BGD) → BNMin
  7. If(BRWL / BLWL < 1, BLWL / BRWL, BRWL / BLWL) → BWR
  8. Median(BDat) → BMed
  9. If(BRBL / BLBL < 1, BLBL / BRBL, BRBL / BLBL) → BBR
  10. Min(BDat) → BMin
  11. Max(BDat) → BMax
  12. Element(ADatSq, Data) → ADat
  13. Median(ADat) → AMed
  14. Min(ADat) → AMin
  15. Min(AMin, BMin) → CMin
  16. Max(ADat) → AMax
  17. Max(AMax, BMax) → CMax
  18. If(5 * LBScl ≤ UBScl, 5 * LBScl, If[2 * LBScl ≤ UBScl, 2 * LBScl, LBScl]) → Scl
  19. Q1(ADat) → AQ1
  20. Q3(ADat) → AQ3
  21. If(ARBL / ALBL < 1, ALBL / ARBL, ARBL / ALBL) → ABR
  22. KeepIf(ALF ≤ x ≤ AUF, ADat) → AGD
  23. Min(AGD) → ANMin
  24. Max(AGD) → ANMax
  25. If(ARWL / ALWL < 1, ALWL / ARWL, ARWL / ALWL) → AWR
  26. Element(AcSq, Data) → Acc
  27. Sequence(k, k, CMin, CMax, 10^(-Acc)) → CDomain
  28. Sort(Intersection[CDomain, BDat]) → BRange
  29. Sequence(k, k, BLF, BUF, 10^(-Acc)) → BMiddle
  30. CountIf(x < BLF, BRange) → BLOC
  31. CountIf(x ≤ BMax, BRange) → BCount
  32. Segment(LfEP, RtEP) → nmbln
  33. Segment(BNMin3, BNMin1) → newmin1
  34. Midpoint(newmin1) → BNMin2
  35. Segment(BQ13, BQ11) → qlo3
  36. Segment(BMed2, BMed1) → med2
  37. Midpoint(qlo3) → BQ12
  38. Segment(BNMin2, BQ12) → lwh
  39. Segment(BQ33, BQ31) → qhi3
  40. Segment(BQ13, BQ33) → boxtop2
  41. Segment(BQ11, BQ31) → boxbot
  42. Segment(BNMax3, BNMax1) → newmax2
  43. Midpoint(newmax2) → BNMax2
  44. Midpoint(qhi3) → BQ32
  45. Segment(BQ32, BNMax2) → rwh2
  46. Segment(ANMin3, ANMin1) → min4
  47. Segment(AQ11, AQ13) → qlo4
  48. Segment(AMed2, AMed1) → med4
  49. Segment(AQ33, AQ31) → qhi4
  50. Segment(AMax3, AMax1) → max4
  51. Segment(AQ11, AQ33) → boxtop4
  52. Segment(AQ13, AQ31) → boxbot4
  53. Midpoint(min4) → ANMin2
  54. Midpoint(qlo4) → AQ12
  55. Midpoint(qhi4) → AQ32
  56. Midpoint(max4) → AMax2
  57. Segment(ANMin2, AQ12) → lwh4
  58. Segment(AQ32, AMax2) → rwh4
  59. KeepIf(x < BLF, BRange) → BLO
  60. Sequence((adapt(Element[BLO, k]), -0.8), k, 1, BLOC) → BLO2
  61. Element(GrpSeqA, Data) → GrpA
  62. Element(GrpSeqB, Data) → GrpB
  63. KeepIf(x < ALF, ADat) → ALO
  64. KeepIf(x > AUF, ADat) → ARO
  65. KeepIf(x > BUF, BDat) → BRO
  66. Sort(Intersection[CDomain, ADat]) → ARng
  67. Union(ARng, BRange) → CRange
  68. CountIf(x ≤ AMax, ARng) → ACount
  69. CountIf(x < ALF, ARng) → ALOC
  70. CountIf(x > BUF, BRange) → BROC
  71. CountIf(x > AUF, ARng) → AROC
  72. Sequence(k, k, ALF, AUF, 10^(-Acc)) → AMid
  73. Sequence(k, k, BLE, BLF - 10^(-Acc), 10^(-Acc)) → BLeft
  74. Element(DesSeq, Data) → DD0
  75. Element(LabSeq, Data) → DtLb
  76. If(AMax > BMax, 1, If[AMax < BMax, 2, 3]) → AnMax
  77. If(AMin > BMin, 1, If[AMin < BMin, 2, 3]) → AnMin
  78. Element(QsSqSq, Mod[Seed, 6] + 1) → QsNmSq
  79. If(AWR > BWR + 0.05, 1, If[BWR > ABR + 0.05, 2, If[ABR > BBR + 0.05, 1, If[BBR > ABR + 0.05, 2, 3]]]) → AnSkw
  80. Element(AnSkwSq, AnSkw) → ExtAnSkw
  81. If(AMed > BMed, 1, If[BMed > AMed, 2, 3]) → AnMed
  82. If(ARng_1 > BRng + DF, 1, If[BRng > ARng_1 + DF, 2, 3]) → AnRng
  83. If(AIQR > BIQR + DF, 1, If[BIQR > AIQR + DF, 2, 3]) → AnIQR
  84. Element(QsSq, Element[QsNmSq, 1]) → QA
  85. Element(QsSq, Element[QsNmSq, 2]) → QB
  86. Element(QsSq, Element[QsNmSq, 3]) → QC
  87. Element(QsSq, Element[QsNmSq, 4]) → QD
  88. Element(QsSq, Element[QsNmSq, 5]) → QE
  89. Element(QsSq, Element[QsNmSq, 6]) → QF
  90. Element(AnMaxSq, AnMax) → ExtAnMax
  91. Element(AnMinSq, AnMin) → ExtAnMin
  92. Element(AnMedSq, AnMed) → ExtAnMed
  93. Element(AnRngSq, AnRng) → ExtAnRng
  94. Element(AnIQRSq, AnIQR) → ExtAnIQR
  95. Element(ExtAnSeq, Element[QsNmSq, 1]) → ExtAnA
  96. Element(ExtAnSeq, Element[QsNmSq, 2]) → ExtAnB
  97. Element(ExtAnSeq, Element[QsNmSq, 3]) → ExtAnC
  98. Element(ExtAnSeq, Element[QsNmSq, 4]) → ExtAnD
  99. Element(ExtAnSeq, Element[QsNmSq, 5]) → ExtAnE
  100. Element(ExtAnSeq, Element[QsNmSq, 6]) → ExtAnF
  101. Sequence(Text[k, (adapt(k) - 1, -1.14)], k, AxMin, AxMax, Scl) → NmbLbSq
  102. Sequence(Segment[(k * Stretch + 4, -1.08), (k * Stretch + 4, -1.06)], k, 0, AxMax - AxMin, Scl) → TicSq

AI Drawing Prompt Reference

Draw box plots for two sets of data, each including the minimum, first quartile, median, third quartile, and maximum. First, plot the minimum and maximum for each set, then the median and quartiles. Next, draw the box plots for both sets and compare their positions and shapes. Finally, draw the box plots for both sets, labeling the minimum, first quartile, median, third quartile, and maximum.
The prompt above was compiled from the original drawing commands and is for reference only.