早教吧作业答案频道 -->数学-->
如何用mathematica计算拟合度?给程序,谢谢,比如,我的一次线性数据是:data1={{0.0217,0.0476},{0.0424,0.09559},{0.0627,0.142},{0.0833,0.189},{0.104,0.237},{0.1242,0.283}}k=Fit[data1,{1,x},x]f=Plot[k,{x,0.00
题目详情
如何用mathematica计算拟合度?
给程序,谢谢,比如,我的一次线性数据是: data1 = {{0.0217, 0.0476}, {0.0424, 0.09559}, {0.0627, 0.142}, {0.0833, 0.189}, {0.104, 0.237}, {0.1242, 0.283}} k = Fit[data1, {1, x}, x] f = Plot[k, {x, 0.00, 0.15}] g = ListPlot[data1] Show[f, g] 如上图像已经画出来了,怎么算拟合度R?
给程序,谢谢,比如,我的一次线性数据是: data1 = {{0.0217, 0.0476}, {0.0424, 0.09559}, {0.0627, 0.142}, {0.0833, 0.189}, {0.104, 0.237}, {0.1242, 0.283}} k = Fit[data1, {1, x}, x] f = Plot[k, {x, 0.00, 0.15}] g = ListPlot[data1] Show[f, g] 如上图像已经画出来了,怎么算拟合度R?
▼优质解答
答案和解析
……线性回归有个更专业的函数的,LinearModelFit,从中可以提取多种参数,当然也包括相关系数:
data1 = {{0.0217,0.0476},{0.0424,0.09559},{0.0627,
0.142},{0.0833,0.189},{0.104,0.237},{0.1242,0.283}};
lm = LinearModelFit[data1,x,x];
lm["RSquared"]
(*0.999994*)
data1 = {{0.0217,0.0476},{0.0424,0.09559},{0.0627,
0.142},{0.0833,0.189},{0.104,0.237},{0.1242,0.283}};
lm = LinearModelFit[data1,x,x];
lm["RSquared"]
(*0.999994*)
看了 如何用mathematica...的网友还看了以下:
f(x)+f(y)=2f[(x+y)/2]f[(x-y)/2],f(0)不等于,且存在非零常数c, 2020-05-14 …
函数在0到1的闭区间内二阶导数大于0选择:a.f'(1)>f'(0)>f(1)—f(0)b.f'( 2020-05-16 …
设在区间[0,1]上f''(x)>0,则f'(0)f'(1)和f(1)-f(0)的大小顺序是设在区 2020-06-08 …
若f(x)是奇函数,定义域为R,则f(0)=0为什么我看到有的答案是这样的“如果f(x)是定义域为 2020-06-17 …
高等数学模拟六已知f'(x)∫[0→2]f(x)=8,且f(0)=0,则∫[0→2]f(x)dx= 2020-06-30 …
设f(x)在0,1上满足f''(x)>0,则必有A.f'(1)>f'(0)>f(1)-f(0)B. 2020-07-26 …
若函数f(x),x属于R,则对于任意的x1,x2都有f(x1+x2)+f(x1-x2)=2f(x1 2020-08-01 …
f(x)在[0,1]上二阶可微且f'(0)=f'(1)=0,则存在c,使得f''(c)≥4|f(1) 2020-11-03 …
(2014•内江模拟)已知二次函数f(x)=ax2+bx+c的导数为f′(x),f′(0)>0,并且 2020-11-12 …
设函数f(x)对任意函数x,y,有f(x+y)=f(x)+f(y),且当x>0时,f(x)<0,求f 2020-12-08 …