24小时热门版块排行榜    

查看: 3085  |  回复: 11
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

King_A

金虫 (小有名气)

[求助] 求matlab编程代码,求帮助,谢谢! 已有3人参与

有上述公式22,其中除f,D和Q外,其它均为已知量,其中T(t)为一维数组,此外还已知另一数组Y(t)。
现想进行一下计算:定义K=∑(f-Y(t))^2,分别对K求D和Q的一阶偏导数,并另其一阶偏导数等于0,解方程组,最终得到D和Q 的值,
最后将计算所得的D和Q值返回到公式22中,画出(T,f)曲线。

自行研究多日,却不得其所,实在无奈,只得到此求助大神帮帮,在此先表谢意。

求matlab编程代码,求帮助,谢谢!
22.png
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hytao2012

铁杆木虫 (正式写手)

木头虫子

【答案】应助回帖


jjdg: 金币+1, 辛苦了 2014-08-04 15:04:21
我也写了一个小程序,感觉好像是因为你的方程太复杂,解不出来啊,注释的是我写了个简单的方程,就可以了。

clear; clc;
syms N g D Ph Q R T To f Y K
f=1-exp(-N*g*(D/Ph)^1.5*(exp(-Q/(R*T))*R*T^2/Q*(1-exp(Q*(To-T)/R/T^2)))^1.5);
% f=D^2+Q^2;
K=sum((f-Y)^2);
dD=diff(K, D);
dQ=diff(K, Q);
Result=solve(dD==0, dQ==0, D, Q)
% Result.D
% Result.Q
9楼2014-08-04 09:04:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答

jerkwin

专家顾问 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
做最小二乘拟合吧
2楼2014-07-30 22:27:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

King_A

金虫 (小有名气)

引用回帖:
2楼: Originally posted by jerkwin at 2014-07-30 22:27:35
做最小二乘拟合吧

最小二乘拟合达不到我的要求啊,我还需要具体的D和Q的值。最小二乘拟合只能得到方程,得不到具体D和Q
3楼2014-07-31 08:49:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

King_A

金虫 (小有名气)

下面是我自行编辑的,请大神帮忙看下哪有错误。
clear all
syms a b c d r N g x y
f=1-exp(-N*g*(a/b)^1.5*(exp(-c/(r*x))*(r*(x^2)/c)*(1-exp(c*(d-x)/(r*(x^2)))))^(3/2))
k=sum(f-y)^2
z=diff(k,'a')
h=diff(k,'b')
[a,b]=solve('-(3*N*g*exp(-N*g*(a/b)^(3/2)*(-(r*x^2*exp(-c/(r*x))*(exp((c*(d - x))/(r*x^2)) - 1))/c)^(3/2))*(a/b)^(1/2)*(y + exp(-N*g*(a/b)^(3/2)*(-(r*x^2*exp(-c/(r*x))*(exp((c*(d - x))/(r*x^2)) - 1))/c)^(3/2)) - 1)*(-(r*x^2*exp(-c/(r*x))*(exp((c*(d - x))/(r*x^2)) - 1))/c)^(3/2))/b=0','(3*N*a*g*exp(-N*g*(a/b)^(3/2)*(-(r*x^2*exp(-c/(r*x))*(exp((c*(d - x))/(r*x^2)) - 1))/c)^(3/2))*(a/b)^(1/2)*(y + exp(-N*g*(a/b)^(3/2)*(-(r*x^2*exp(-c/(r*x))*(exp((c*(d - x))/(r*x^2)) - 1))/c)^(3/2)) - 1)*(-(r*x^2*exp(-c/(r*x))*(exp((c*(d - x))/(r*x^2)) - 1))/c)^(3/2))/b^2=0')

下面是结果:
Warning: The solutions are parametrized by the symbols:
z  = C_
z11 = C_
z4 = ({0, d} union Dom::ImageSet(-(c*(((c + 8*PI*d*k*r*I)/c)^(1/2) -
1)*I)/(4*PI*k*r), k, Z_ minus {0}) union Dom::ImageSet((c*(((c +
8*PI*d*k*r*I)/c)^(1/2) + 1)*I)/(4*PI*k*r), k, Z_ minus {0})) minus {0}
z5 = ({0, d} union Dom::ImageSet(-(c*(((c + 8*PI*d*k*r*I)/c)^(1/2) -
1)*I)/(4*PI*k*r), k, Z_ minus {0}) union Dom::ImageSet((c*(((c +
8*PI*d*k*r*I)/c)^(1/2) + 1)*I)/(4*PI*k*r), k, Z_ minus {0})) minus {0}

> In solve at 190

a =

  z
z4
z5


b =

       1 - exp(-N*g*(a/b)^(3/2)*((r*z^2*exp(-c/(r*z)))/c - (r*z^2*exp((c*d)/(r*z^2) - c/(r*z))*exp(-c/(r*z)))/c)^(3/2))
                                                                                                                    z11
1 - exp(-N*g*(a/b)^(3/2)*((r*z5^2*exp(-c/(r*z5)))/c - (r*z5^2*exp((c*d)/(r*z5^2) - c/(r*z5))*exp(-c/(r*z5)))/c)^(3/2))
4楼2014-07-31 10:16:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 今天放榜没戏了吧 +9 yuleib84 2026-08-19 11/550 2026-08-21 10:06 by gltch
[基金申请] 让我中一个面上吧! +10 大萍1987 2026-08-20 12/600 2026-08-21 09:31 by 020100099
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[基金申请] 放榜前的不淡定 40+4 snowwithsea 2026-08-19 13/650 2026-08-21 08:30 by 北京莱茵编辑
[基金申请] 时间戳今天,20号变了 +4 archvillain 2026-08-20 4/200 2026-08-21 08:10 by gatelove
[基金申请] 只有每年这种时候来逛逛小木虫 +22 yaoyewhu2008 2026-08-20 24/1200 2026-08-21 07:44 by DanielDDDD
[基金申请] 估计是周四 +3 archvillain 2026-08-18 3/150 2026-08-21 01:48 by jnhyjjm
[基金申请] 科研孤儿太难了 +14 我4大白菜 2026-08-20 15/750 2026-08-20 22:33 by 袁向阳007
[基金申请] 时间戳又变了 +12 wuchongjun 2026-08-20 17/850 2026-08-20 20:05 by spzhao
[基金申请] 今天系统多次维护,明天很可能放榜! +10 zju2000 2026-08-16 11/550 2026-08-20 20:02 by cl479861084
[基金申请] 时间戳变了,能看出什么问题? +18 基诺咪客 2026-08-17 23/1150 2026-08-20 17:19 by Godzela
[基金申请] 重要消息,中午系统在维护 +11 yuleib84 2026-08-18 12/600 2026-08-20 11:09 by xskun
[基金申请] 今天放榜吗? +14 布布和一二 2026-08-19 15/750 2026-08-19 18:07 by gltch
[基金申请] filecode=后面第一个是大写字母 +10 wangze12014 2026-08-14 12/600 2026-08-19 16:56 by 苦难博士
[基金申请] 2027广东省杰青 +4 奶牛小黑 2026-08-15 10/500 2026-08-19 11:02 by wanfengnew
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +6 Tide man 2026-08-14 7/350 2026-08-19 09:56 by ZJTJZ
[基金申请] 明天放榜? +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -大大大大大-
[基金申请] 时间戳又变了8-15 +14 archvillain 2026-08-15 26/1300 2026-08-18 13:37 by phantomgost
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
信息提示
请填处理意见