WhiskersProtocol

Mike May, S.J.

GeoGebra Graphics View

No. Name Definition Algebra
1 Number B6   B6 = 6
2 Number xMax   xMax = 100
3 Number xMin   xMin = 0
4 Number xHigh   xHigh = 8
5 Number xLow   xLow = -4
6 Number yLevel   yLevel = -3
7 Point B (xHigh, yLevel) B = (8, -3)
8 Point A (xLow, yLevel) A = (-4, -3)
9 Segment Bar Segment [A, B] Bar = 12
10 Point P10 Point on Bar P10 = (3.38, -3)
11 Point P11 Point on Bar P11 = (3, -3)
12 Point P9 Point on Bar P9 = (7.24, -3)
13 Point P8 Point on Bar P8 = (-0.38, -3)
14 Point P7 Point on Bar P7 = (-2.14, -3)
15 Point P6 Point on Bar P6 = (2.36, -3)
16 Point P5 Point on Bar P5 = (4, -3)
17 Point P2 Point on Bar P2 = (-1.26, -3)
18 Point P1 Point on Bar P1 = (0.52, -3)
19 Point P3 Point on Bar P3 = (6.2, -3)
20 Point P4 Point on Bar P4 = (1.44, -3)
21 List L1 {P1, P2, P3, P4, P5, P6, P7, P8, P9, P10, P11} L1 = {(0.52, -3), (-1.26, -3), (6.2, -3), (1.44, -3), (4, -3), (2.36, -3), (-2.14, -3), (-0.38, -3), (7.24, -3), (3.38, -3), (3, -3)}
22 List L2 Sort[L1] + (0, 1) L2 = {(-2.14, -2), (-1.26, -2), (-0.38, -2), (0.52, -2), (1.44, -2), (2.36, -2), (3, -2), (3.38, -2), (4, -2), (6.2, -2), (7.24, -2)}
23 List Lx x(L2) Lx = {-2.14, -1.26, -0.38, 0.52, 1.44, 2.36, 3, 3.38, 4, 6.2, 7.24}
24 List L3 xMin + (Lx - xLow) (xMax - xMin) / (xHigh - xLow) L3 = {15.5, 22.83, 30.17, 37.67, 45.33, 53, 58.33, 61.5, 66.67, 85, 93.67}
25 Number C6 Element[L3, B6] C6 = 53
26 List L4 xMin + (x(L1) - xLow) (xMax - xMin) / (xHigh - xLow) L4 = {37.67, 22.83, 85, 45.33, 66.67, 53, 15.5, 30.17, 93.67, 61.5, 58.33}
27 Number B1   B1 = 1
28 Number B2   B2 = 2
29 List LSorted Sequence["SortedValue" + (i) + " = " + Element[L3, i], i, 1, 11] LSorted = {"SortedValue1 = 15.5", "SortedValue2 = 22.83", "SortedValue3 = 30.17", "SortedValue4 = 37.67", "SortedValue5 = 45.33", "SortedValue6 = 53", "SortedValue7 = 58.33", "SortedValue8 = 61.5", "SortedValue9 = 66.67", "SortedValue10 = 85", "SortedValue11 = 93.67"}
30 Text text1 TableText[{LSorted}, "v"] text1 = "\begin{tabular}{l}SortedValue1 = 15.5& \\ SortedValue2 = 22.83& \\ SortedValue3 = 30.17& \\ SortedValue4 = 37.67& \\ SortedValue5 = 45.33& \\ SortedValue6 = 53& \\ SortedValue7 = 58.33& \\ SortedValue8 = 61.5& \\ SortedValue9 = 66.67& \\ SortedValue10 = 85& \\ SortedValue11 = 93.67& \\ \end{tabular}"
31 Point i   i = (0, 1)
32 Number B3   B3 = 3
33 Number B4   B4 = 4
34 Number B5   B5 = 5
35 Number B7   B7 = 7
36 Number B8   B8 = 8
37 Number B9   B9 = 9
38 Number B10   B10 = 10
39 Number B11   B11 = 11
40 Point A2 Element[L2, B2] A2 = (-1.26, -2)
41 Point A7 Element[L2, B7] A7 = (3, -2)
42 Point A8 Element[L2, B8] A8 = (3.38, -2)
43 Point A9 Element[L2, B9] A9 = (4, -2)
44 Point A10 Element[L2, B10] A10 = (6.2, -2)
45 Point A11 Element[L2, B11] A11 = (7.24, -2)
46 Point A3 Element[L2, B3] A3 = (-0.38, -2)
47 Point A4 Element[L2, B4] A4 = (0.52, -2)
48 Point A5 Element[L2, B5] A5 = (1.44, -2)
49 Point A6 Element[L2, B6] A6 = (2.36, -2)
50 Point A1 Element[L2, B1] A1 = (-2.14, -2)
51 Text L5 "v" + " = " + L3 L5 = "v = {15.5, 22.83, 30.17, 37.67, 45.33, 53, 58.33, 61.5, 66.67, 85, 93.67}"
52 List LUnsorted Sequence["UnsortedValue" + (i) + " = " + Element[L4, i], i, 1, 11] LUnsorted = {"UnsortedValue1 = 37.67", "UnsortedValue2 = 22.83", "UnsortedValue3 = 85", "UnsortedValue4 = 45.33", "UnsortedValue5 = 66.67", "UnsortedValue6 = 53", "UnsortedValue7 = 15.5", "UnsortedValue8 = 30.17", "UnsortedValue9 = 93.67", "UnsortedValue10 = 61.5", "UnsortedValue11 = 58.33"}
53 Text text2 TableText[{LUnsorted}, "v"] text2 = "\begin{tabular}{l}UnsortedValue1 = 37.67& \\ UnsortedValue2 = 22.83& \\ UnsortedValue3 = 85& \\ UnsortedValue4 = 45.33& \\ UnsortedValue5 = 66.67& \\ UnsortedValue6 = 53& \\ UnsortedValue7 = 15.5& \\ UnsortedValue8 = 30.17& \\ UnsortedValue9 = 93.67& \\ UnsortedValue10 = 61.5& \\ UnsortedValue11 = 58.33& \\ \end{tabular}"
54 Number BoxPlotL1 BoxPlot[0, 1, Lx] BoxPlotL1 = 2.36
55 Number C1 Element[L3, B1] C1 = 15.5
56 Number C2 Element[L3, B2] C2 = 22.83
57 Number C3 Element[L3, B3] C3 = 30.17
58 Number C4 Element[L3, B4] C4 = 37.67
59 Number C5 Element[L3, B5] C5 = 45.33
60 Number C7 Element[L3, B7] C7 = 58.33
61 Number C8 Element[L3, B8] C8 = 61.5
62 Number C9 Element[L3, B9] C9 = 66.67
63 Number C10 Element[L3, B10] C10 = 85
64 Number C11 Element[L3, B11] C11 = 93.67
65 Text text3 "Median value is " + C6 text3 = "Median value is 53"
66 Text text4 "Quartile 1 is " + C3 text4 = "Quartile 1 is 30.17"
67 Text text5 "Quartile 3 " + C9 text5 = "Quartile 3 66.67"
68 Number LMean Mean[L3] LMean = 51.79
69 Text text6 "Mean Value is " + LMean text6 = "Mean Value is 51.79"
70 Text text7 "The sum is " + Sum[L3] text7 = "The sum is 569.67"
71 Segment HignEnd Segment [(xHigh, yLevel + 0.5), (xHigh, yLevel - 0.5)] HignEnd = 1
72 Segment LowEnd Segment [(xLow, yLevel + 0.5), (xLow, yLevel - 0.5)] LowEnd = 1
Created with GeoGebra