UC知道数据拟和 求参数
来源：百度知道 编辑：UC知道 时间：2024/06/02 10:30:23
大气透过率的问题 τ=exp(-αR)想由下表数据求出衰减系数α
R/km 1 3 4 8 10 12 16 18 20
τ 0.3686 0.3525 0.3441 0.3168 0.3018 0.2870 0.2600 0.2812 0.2308
什么方法都好，最好用Matlab
求解过程!!!
谢谢大家了
R/km 1 3 4 8 10 12 16 20
τ 0.3686 0.3525 0.3441 0.3168 0.3018 0.2870 0.2600 0.2308
那把那组数据去掉呢？模型还是τ=exp(-αR)
结果是多少？谢谢
R/km 1 3 4 8 10 12 16 18 20
τ 0.3686 0.3525 0.3441 0.3168 0.3018 0.2870 0.2600 0.2812 0.2308
什么方法都好，最好用Matlab
求解过程!!!
谢谢大家了
R/km 1 3 4 8 10 12 16 20
τ 0.3686 0.3525 0.3441 0.3168 0.3018 0.2870 0.2600 0.2308
那把那组数据去掉呢？模型还是τ=exp(-αR)
结果是多少？谢谢
【2】补充。去掉第8个可以数据。Matlab程序：
R=[1 3 4 8 10 12 16 20 ]'
T=[0.3686 0.3525 0.3441 0.3168 0.3018 0.2870 0.2600 0.2308]'
pp=polyfit(R,T,1)
TT=polyval(pp,R)
plot(R,T,'o',R,TT)
tao=vpa(poly2sym(pp,'R'),5)
运行结果：
tao = -0.0071846*R+0.37416
【1】模型是不是有问题啊？第八个数据很可疑啊？不信你看。
R=[1 3 4 8 10 12 16 18 20 ]'
T=[0.3686 0.3525 0.3441 0.3168 0.3018 0.2870 0.2600 0.2812 0.2308]'
pp=polyfit(R,T,1)
TT=polyval(pp,R)
plot(R,T,'o-',R,TT)
y=log(T)
x=R
alpha=regress(y,x)
figure
plot(x,y,'*-',x,alpha*x)