MathPlotAI Logo MathPlotAI

Number Table

Number Table
Loading the math board and drawing, please wait…
2020-07-06 14:10
FunctionSequenceGeometric Construction
This example demonstrates how to create a number table in GeoGebra to showcase the patterns of sequences and functions. The core mathematical concepts involved include sequences, functions, rotation, and planes. The construction highlights the use of commands like TableText, Textfield, Sequence, along with objects such as text29, text1, snum, rows, cols, tab, A, ch, B, InputBox1, C, cw, ws, fac1, fac2, fac3, xss, FI, InputBox2, xssc, CI, InputBox3, LS, RS, InputBox4, a, b, c, D, pic2. It is suitable for high school mathematics education, illustrating the graphs and properties of sequences and functions.

GeoGebra Commands & Parameters

  1. TableText(Sequence[Sequence[snum + ((r - 1) * cols) + c - 1, c, 1, cols, 1], r, 1, rows, 1], "c_|") → tab
  2. Textfield(snum) → InputBox1
  3. Sequence(If[snum + ((rows - 1) * cols) + i < 10, Element[cw, 1], If[snum + ((rows - 1) * cols) + i < 100, Element[cw, 2], Element[cw, 3]]], i, 0, cols - 1) → ws
  4. Sequence(If[i ≟ 0, 0, Sum[Element[ws, n], n, 1, i]], i, 0, cols, 1) → xss
  5. Sequence(Sequence[If[Mod[snum + ((r - 1) * cols) + c - 1, fac1] ≟ 0, Polygon[(Element[xss, c], ((-ch) * (r - 1))), (Element[xss, c + 1], ((-ch) * (r - 1))), (Element[xss, c + 1], ((-ch) * r)), (Element[xss, c], ((-ch) * r))]], c, 1, cols, 1], r, 1, rows, 1) → FI
  6. Textfield(fac1) → InputBox2
  7. Sequence((Element[xss, i + 1] + Element[xss, i]) / 2, i, 1, cols) → xssc
  8. Sequence(Sequence[If[Mod[snum + ((r - 1) * cols) + c - 1, fac2] ≟ 0, Circle[(Element[xssc, c], ((-ch) * (r - 0.5))), ch / 2]], c, 1, cols, 1], r, 1, rows, 1) → CI
  9. Textfield(fac2) → InputBox3
  10. Sequence(Sequence[If[Mod[snum + ((r - 1) * cols) + c - 1, fac3] ≟ 0, Segment[(Element[xssc, c] - ch / 2, ((-ch) * (r - 1))), (Element[xssc, c] + ch / 2, ((-ch) * r))]], c, 1, cols, 1], r, 1, rows, 1) → LS
  11. Sequence(Sequence[If[Mod[snum + ((r - 1) * cols) + c - 1, fac3] ≟ 0, Segment[(Element[xssc, c] + ch / 2, ((-ch) * (r - 1))), (Element[xssc, c] - ch / 2, ((-ch) * r))]], c, 1, cols, 1], r, 1, rows, 1) → RS
  12. Textfield(fac3) → InputBox4