Bivariate Distribution: Dual Input Demo

Bivariate Distribution: Dual Input Demo
Loading the math board and drawing, please wait…
2018-05-24 21:49
This example demonstrates the bivariate distribution with dual inputs, involving core math concepts like correlation, linear regression, matrices, vectors, and coordinate geometry. It constructs using commands like Sum, Mean, Textfield, Intersect, and Sequence, making it suitable for high school and above learners/teachers exploring data distribution and regression analysis.

GeoGebra Commands & Parameters

  1. Sum(Sequence[Element[lista10, i], i, 1, n]) → j
  2. Sum(Sequence[Element[lista11, i], i, 1, n]) → k
  3. Sum(Sequence[Element[lista12, i], i, 1, n]) → l
  4. Sum(Sequence[Element[lista13, i], i, 1, n]) → m
  5. Sum(Sequence[Element[lista14, i], i, 1, n_2]) → o
  6. Sum(Sequence[Element[lista15, i], i, 1, n]) → p
  7. Sum(Sequence[Element[lista16, i], i, 1, n]) → q
  8. Sum(Sequence[Element[lista17, i], i, 1, n]) → r
  9. Sum(Sequence[Element[lista18, i], i, 1, n]) → s
  10. Mean(Take[lista19Y, 1, n_2], Take[lista19FrecY, 1, n_2]) → u
  11. Textfield(n) → CasillaDeEntrada1
  12. Sum(Sequence[Element[lista1, i], i, 1, n_2]) → a
  13. Sum(Sequence[Element[lista2, i], i, 1, n_2]) → b
  14. Sum(Sequence[Element[lista3, i], i, 1, n_2]) → c
  15. Sum(Sequence[Element[lista4, i], i, 1, n_2]) → d
  16. Sum(Sequence[Element[lista5, i], i, 1, n_2]) → e
  17. Sum(Sequence[Element[lista6, i], i, 1, n_2]) → f
  18. Sum(Sequence[Element[lista7, i], i, 1, n_2]) → g
  19. Sum(Sequence[Element[lista8, i], i, 1, n_2]) → h
  20. Sum(Sequence[Element[lista9, i], i, 1, n_2]) → i
  21. Mean(Take[lista19X, 1, n], Take[lista19FreX, 1, n]) → t
  22. Sum(Sequence[((Element[lista19X, 1] * Element[lista19Y, i]) * Element[lista1, i]), i, 1, n]) → c_1
  23. Sum(Sequence[((Element[lista19X, 2] * Element[lista19Y, i]) * Element[lista2, i]), i, 1, n_2]) → d_1
  24. Sum(Sequence[((Element[lista19X, 3] * Element[lista19Y, i]) * Element[lista3, i]), i, 1, n_2]) → e_1
  25. Sum(Sequence[((Element[lista19X, 4] * Element[lista19Y, i]) * Element[lista4, i]), i, 1, n_2]) → f_1
  26. Sum(Sequence[((Element[lista19X, 5] * Element[lista19Y, i]) * Element[lista5, i]), i, 1, n_2]) → g_1
  27. Sum(Sequence[((Element[lista19X, 6] * Element[lista19Y, i]) * Element[lista6, i]), i, 1, n_2]) → h_1
  28. Sum(Sequence[((Element[lista19X, 7] * Element[lista19Y, i]) * Element[lista7, i]), i, 1, n_2]) → i_1
  29. Sum(Sequence[((Element[lista19X, 8] * Element[lista19Y, i]) * Element[lista8, i]), i, 1, n_2]) → j_1
  30. Sum(Sequence[((Element[lista19X, 9] * Element[lista19Y, i]) * Element[lista9, i]), i, 1, n_2]) → k_1
  31. Sum(Take[lista19FreX, 1, n]) → t_1
  32. Textfield(w_1) → CasillaDeEntrada2
  33. Intersect(a_2, c_2) → B
  34. Textfield(e_2) → CasillaDeEntrada3
  35. Intersect(b_2, f_2) → C
  36. Sum(Take[lista19FreX, 1, n]) → h_2
  37. Textfield(n_2) → CasillaDeEntrada4
  38. Sequence(((Element[lista19X, 2] * Element[lista19Y, j]) * Element[lista1, j]), j, 1, n_2) → b_1
  39. Sequence(Circle[(Element[lista19X, 1], Element[lista19Y, i]), If[Element[lista1, i] ≟ 0, -0.1, Element[lista1, i] / (t_1 / 2)]], i, 1, n_2) → lista20
  40. Sequence(Circle[(Element[lista19X, 2], Element[lista19Y, i]), If[Element[lista2, i] ≟ 0, -0.1, Element[lista2, i] / (t_1 / 2)]], i, 1, n_2) → lista21
  41. Sequence(Circle[(Element[lista19X, 3], Element[lista19Y, i]), If[Element[lista3, i] ≟ 0, -0.1, Element[lista3, i] / (t_1 / 2)]], i, 1, n_2) → lista22
  42. Sequence(Circle[(Element[lista19X, 4], Element[lista19Y, i]), If[Element[lista4, i] ≟ 0, -0.1, Element[lista4, i] / (t_1 / 2)]], i, 1, n_2) → lista23
  43. Sequence(Circle[(Element[lista19X, 5], Element[lista19Y, i]), If[Element[lista5, i] ≟ 0, -0.1, Element[lista5, i] / (t_1 / 2)]], i, 1, n_2) → lista24
  44. Sequence(Circle[(Element[lista19X, 6], Element[lista19Y, i]), If[Element[lista6, i] ≟ 0, -0.1, Element[lista6, i] / (t_1 / 2)]], i, 1, n_2) → lista25
  45. Sequence(Circle[(Element[lista19X, 7], Element[lista19Y, i]), If[Element[lista7, i] ≟ 0, -0.1, Element[lista7, i] / (t_1 / 2)]], i, 1, n_2) → lista26
  46. Sequence(Circle[(Element[lista19X, 8], Element[lista19Y, i]), If[Element[lista8, i] ≟ 0, -0.1, Element[lista8, i] / (t_1 / 2)]], i, 1, n_2) → lista27
  47. Sequence(Circle[(Element[lista19X, 9], Element[lista19Y, i]), If[Element[lista9, i] ≟ 0, -0.1, Element[lista9, i] / (t_1 / 2)]], i, 1, n_2) → lista28