rsquarefunc.m

来自「利用这个程序可以利用最小2乘法拟合一个简单的多项式」· M 代码 · 共 6 行

function [r, b]=rsquarefunc(x,y)
b=(x'*x)\(x'*y);
ssr=b'*x'*y-sum(y)^2/length(y);
syy=y'*y-sum(y)^2/length(y);
r=ssr/syy;