请问，lsqcurvefit拟合后如何显示相关系数R^2？

limopcb

& n+ M7 E5 e4 a  H2 B8 z请问，lsqcurvefit拟合后如何显示相关系数R^2，感谢！
. j" r2 M8 ?- m, g# b, G( ?clear;clc;
T=[293.15        298.15        303.15        308.15        313.15];
c=[0.000378156        0.000425433        0.000562474        0.000684178        0.000981096];
. f, l2 V) Y* z/ K5 j. n& z& pTT=T';
; [9 J* a$ R1 }# B7 rcc=c';
6 M! D5 Z1 [/ n4 a7 o6 wx=[TT,cc];
3 |7 }* E( x9 p6 Z6 \5 DHm=33509;
Tm=408.65;
0 e1 O" n. v- L: }, O- _a=0.3;
fun=@(q,x)(-Hm.*(x(:,1)./Tm-1)./(8.314.*x(:,1))+log(x(:,2))+(1-x(:,2)).^2.*((q(1)./(8.314.*x(:,1))).*(exp(-a.*q(1)./(8.314.*x(:,1)))./(x(:,2)+(1-x(:,2)).*exp(-a.*q(1)./(8.314.*x(:,1))))).^2+(q(2)./(8.314.*x(:,1))).*exp(-a.*q(2)./(8.314.*x(:,1)))./(1-x(:,2)+x(:,2).*exp(-a.*q(2)./(8.314.*x(:,1)))).^2));
8 ~) ?4 k0 F, g+ C: E9 O3 e" @+ y: zq0=[0,0];
q=lsqcurvefit(fun,q0,x,zeros(size(x,1),1))
/ S' K5 w; M% Q  }plot(x(:,1),x(:,2),'r^');hold on;
ezplot(@(x,c)fun(q,[x,c]),[290,314,0.0003,0.001]);
h=ezplot(@(x,c)fun(q,[x,c]),[290,314,0.0003,0.001]);
' Z+ D% ~, I3 T  ]& ^/ B

Allevi

非线性拟合，R2没有意义的
参考
, F1 z) \8 K+ v/ j4 t- Rstatisticsbyjim.com/regression/r-squared-invalid-nonlinear-regression
blog.minitab.com/blog/adventures-in-statistics-2/why-is-there-no-r-squared-for-nonlinear-regression