HP 48gII Graphing Calculator - Manual (Page 653)

Página 18-65
n 1 +
p 1 +
FOR j
x j ^
OBJ ARRY
j COL+
NEXT
END
END
y OBJ ARRY
X yv
«
X yv MTREG
NUM
b
«
b yv
X b * Calcular X⋅b
- Calcular e = y - X⋅b
ABS SQ DUP Calcular SSE, copiar resultado
y ΣLIST n / Calcular y
n 1 LIST SWAP CON Vector de n valores de y
yv − ABS SQ Calcular SST
/ Calcular SSE/SST
NEG 1 + √ Calcular r = [1–SSE/SST ] 1/2
“r” TAG Rotular resultado como “r”
SWAP
“SSE” TAG
»
»
»
»
»
Almacene este programa bajo el nombre de POLYR, para acentuar el cálculo
del coeficiente de correlación r.