Interactive Practice Activity on Mean, Median and Mode

Interactive Practice Activity on Mean, Median and Mode
Loading the math board and drawing, please wait…
2020-06-24 01:55
This GeoGebra applet demonstrates how to compute the mean, median, and mode from a frequency table with 5 categories, where one frequency is left unknown. Users can adjust the unknown frequency via input boxes and instantly see how the three measures of central tendency change. The core mathematical concepts are descriptive statistics: mean (arithmetic average), median (middle value after sorting), and mode (most frequent value). The construction uses GeoGebra commands such as Sequence, RemoveUndefined, Insert, Join, Textfield, Median, TableText, Sum, Mean, Mode, and Vector to build dynamic lists and tables. Interactive elements include input boxes (inputBox1-3) and text objects for questions and notes. This activity is suitable for middle or high school statistics lessons, allowing students to explore the sensitivity of these measures to data changes in a hands-on way.

GeoGebra Commands & Parameters

  1. Sequence(Cell[i + 1, 1], i, 1, B3) → ListCategoryValues
  2. Sequence(Cell[i + 1, 2], i, 1, B3) → ListFrequencyValuesFromCells
  3. RemoveUndefined(ListFrequencyValuesFromCells) → ListFrequencyValuesRemovedUndefined
  4. Insert(a, ListFrequencyValuesRemovedUndefined, B4) → ListFrequencyValueswithVariable
  5. Insert("a", ListFrequencyValuesRemovedUndefined, B4) → ListFrequencyValueswithText
  6. Join({ListCategoryTitle, ListCategoryValues}) → ListCategory
  7. Textfield(targetmode) → inputBox1
  8. Textfield(targetmedian) → inputBox2
  9. Textfield(targetmean) → inputBox3
  10. Median(Take[ListCategory, 2, 5], Take[ListFrequencyNum, 2, 5]) → medianvalue1
  11. Join({ListFrequencyTitle, ListFrequencyValueswithText}) → ListFrequencyVariableText
  12. TableText({ListCategory, ListFrequencyNum}, "c|_") → Table2Solution
  13. TableText({ListCategory, ListFrequencyVariableText}, "c|_") → Table1Problem
  14. Join({ListFrequencyTitle, ListFrequencyValueswithVariable}) → ListFrequencyVariableSearch
  15. TableText({ListCategory, ListFrequencyVariableSearch}, "c|_") → Table3HiddenSearch
  16. Sum(Take[ListFrequencyVariableSearch, 2]) → totalfrequency
  17. Median(Take[ListCategory, 2, numberofcategories + 1], Take[ListFrequencyVariableSearch, 2, numberofcategories + 1]) → medianvaluesearch
  18. Sequence(If[i < numberofcategories, "+", ""], i, 1, numberofcategories) → ListAddSign
  19. Sequence(Element[ListCategoryValues, i] + "×" + (Element[ListFrequencyValueswithVariable, i] + Element[ListAddSign, i]), i, 1, numberofcategories) → CategoryFrequencyProductList
  20. Sequence(Element[MatrixAllSortedSearch, 1, i], i, 1, totalfrequency) → ListAllSortedSearch
  21. Sequence(Polygon[(i - 1, 0), (i, 0), (i, Element[ListAllSortedSearch, i]), (i - 1, Element[ListAllSortedSearch, i])], i, 1, totalfrequency) → DataVisualBar
  22. Sequence(Text[Element[ListAllSortedSearch, i], (i - 1, Element[ListAllSortedSearch * 1.1, i])], i, 1, totalfrequency) → DataVisualText
  23. Mean(Take[ListCategory, 2, numberofcategories + 1], Take[ListFrequencyVariableSearch, 2, numberofcategories + 1]) → meanvaluesearch
  24. Mode(ListAllSortedSearch) → modesearch
  25. Vector(((2 * medianposition - 1) / 2, Element[ListAllSortedSearch, totalfrequency]), ((2 * medianposition - 1) / 2, Max[Element[ListAllSortedSearch, totalfrequency] * 0.5, Element[ListAllSortedSearch, medianposition] * 1.2])) → medianpositionpointer
  26. Sum(CategoryFrequencyProductList) → TextSumCategoryFrequency