Tabla de contenido
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 *
-
ABS SQ DUP
y ΣLIST n /
n 1
LIST SWAP CON
yv − ABS SQ
/
NEG 1 + √
"r"
TAG
SWAP
"SSE"
TAG
»
»
»
»
»
Almacene este programa bajo el nombre de POLYR, para acentuar el cálculo
del coeficiente de correlación r.
Calcular X⋅b
Calcular e = y - X⋅b
Calcular SSE, copiar resultado
Calcular y
Vector de n valores de y
Calcular SST
Calcular SSE/SST
Calcular r = [1–SSE/SST ]
Rotular resultado como "r"
1/2
Página 18-65
Tabla de contenido
