Regresion

Estudio de regresión lineal entre altura y peso

es una prueba

x

y

x-\bar{x}

y-\bar{y}

A

B

C

D

E

F

G

H

Suma

Media

DT

(x-\bar{x})(y-\bar{y})

Suma

Covarianza

Comprobar

Punto

Pendiente:

A = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
H = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
G = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
F = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
E = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
D = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
C = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
B = PointIn((x + (0 * y) ≥ 0) ∧ ((0 * x) + y ≥ 0) ∧ (x + (0 * y) ≤ 200) ∧ ((0 * x) + y ≤ 100))
B2: x(A)
B3: x(B)
B4: x(C)
B5: x(D)
B6: x(E)
B7: x(F)
B8: x(G)
B9: x(H)
C2: y(A)
C3: y(B)
C4: y(C)
C5: y(D)
C6: y(E)
C7: y(F)
C8: y(G)
C9: y(H)
B10 = Sum(B2:B9)
C10 = Sum(C2:C9)
B11 = Mean(B2:B9)
C11 = Mean(C2:C9)
B12 = SD(B2:B9)
C12 = SD(C2:C9)
D2: B2 - $B$11
D3: B3 - $B$11
D4: B4 - $B$11
D5: B5 - $B$11
D6: B6 - $B$11
D7: B7 - $B$11
D8: B8 - $B$11
D9: B9 - $B$11
E2: C2 - $C$11
E3: C3 - $C$11
E4: C4 - $C$11
E5: C5 - $C$11
E6: C6 - $C$11
E7: C7 - $C$11
E8: C8 - $C$11
E9: C9 - $C$11
M: (B11, C11)
F2: (D2 * E2)
F3: (D3 * E3)
F4: (D4 * E4)
F5: (D5 * E5)
F6: (D6 * E6)
F7: (D7 * E7)
F8: (D8 * E8)
F9: (D9 * E9)
F10 = Sum(F2:F9)
F11 = Mean(F2:F9)
ver = 1
m = 1.05 (slider from -15 to 15, step 0.01)
f(x) = If[138 ≤ x ≤ 215,y(M) + (m * (x - x(M)))]
A_1: (x(A), f(x(A)))
B_1: (x(B), f(x(B)))
C_1: (x(C), f(x(C)))
D_1: (x(D), f(x(D)))
E_1: (x(E), f(x(E)))
F_1: (x(F), f(x(F)))
G_1: (x(G), f(x(G)))
H_1: (x(H), f(x(H)))
a = Segment(A, A_1)
b = Segment(B, B_1)
c = Segment(C, C_1)
d = Segment(D, D_1)
e = Segment(E, E_1)
g = Segment(F, F_1)
h = Segment(G, G_1)
i = Segment(H, H_1)
sum: a^(2) + b^(2) + c^(2) + d^(2) + e^(2) + g^(2) + h^(2) + i^(2)
texto1: "∑(y-y_r)²=" + (LaTeX[sum]) + ""
j = FitLineY({A, B, C, D, E, F, G, H})
k = Line(M, (0, f(0)))
l = false
texto3: "" + j + ""
lista1 = Sequence(Segment[(140, k), (210, k)], k, 10, 110, 10)
lista2 = Sequence(Segment[(k, 0), (k, 110)], k, 150, 210, 10)
f2(x) = y(M) + (m * (x - x(M)))
n: f2(0)
p: y = (m * x) + n
texto2: "" + p + ""

Tool: rect
dos puntos
Input: D, M
Output: polígono1

B11 = Mean(B2:B9)
C11 = Mean(C2:C9)
polígono1, d, a, m, b = Polygon(D, (x(M), y(D)), M, (x(D), y(M)))