| 查看: 1453 | 回復(fù): 10 | ||
[求助]
matlab程序問題求解答
|
|
function[c,err,yc]=bisect(f,a,b,delta) % Input - f is the function input as a string 'f' % - a and b are the left and right endpoints % - delta is the tolerance % Output - c is the zero % - yc = f(c) % - err is the error estimate for c ya = feval(f,a); yb = feval(f,b); if ya * yb > 0, end max1 = 1+ round((log(b-a)-log(delta))/log(2)); for k =1:max1 c =(a+b)/2; yc = feval(f,c); if yc==0; a=c; b=c; elseif yb * yc > 0 b=c; yb=yc; else a=c; ya=yc; end if b - a < delta, break, end end c=(a+b)/2; err=abs(b-a); yc=feval(f,c); % 求函數(shù)在c處的函數(shù)值 for T=200:10:300 K = exp(-9.3932+3204.71/T+0.835931*log(T)... +2.35267*10^-3*T-1.8736*10^-6*T^2+5.1606*10^-10*T^3) f=inline('(4*K-1)*x^2-8*K*x+4*K'); bisect(f,0,1,10^-5) end 主程序調(diào)用函數(shù)出錯 |
銅蟲 (著名寫手)
|
function problem_solve %-------------------------------------------- disp('----------------分割線-----------------'); %-------------------------------------------- function[c,err,yc]=bisect(f,a,b,delta) % Input - f is the function input as a string 'f' % - a and b are the left and right endpoints % - delta is the tolerance % Output - c is the zero % - yc = f(c) % - err is the error estimate for c ya = feval(f,a); yb = feval(f,b); if ya * yb > 0, end max1 = 1+ round((log(b-a)-log(delta))/log(2)); for k =1:max1 c =(a+b)/2; yc = feval(f,c); if yc==0; a=c; b=c; elseif yb * yc > 0 b=c; yb=yc; else a=c; ya=yc; end if b - a < delta, break, end end c=(a+b)/2; err=abs(b-a); yc=feval(f,c); % 求函數(shù)在c處的函數(shù)值 end %--------------------------------------------- function f=subfun(x,K) f=(4*K-1).*x.^2-8*K.*x+4*K; end %--------------------------------------------- for T=200:10:300 K = exp(-9.3932+3204.71/T+0.835931*log(T)... +2.35267*10^-3*T-1.8736*10^-6*T^2+5.1606*10^-10*T^3) [c,err,yc]=bisect(@(x)subfun(x,K),0,1,10^-5) disp('----------------分割線-----------------'); end end 樓主,希望能幫助到你。 |

銅蟲 (著名寫手)

銅蟲 (著名寫手)

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 07化學(xué)280分求調(diào)劑 +4 | 722865 2026-03-23 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 一志愿國科過程所081700,274求調(diào)劑 +3 | 三水研0水立方 2026-03-23 | 3/150 |
|
|
[考研] 384求調(diào)劑 +3 | 子系博 2026-03-22 | 6/300 |
|
|
[考研] 070300化學(xué)求調(diào)劑 +8 | 苑豆豆 2026-03-20 | 8/400 |
|
|
[考研] 材料專碩英一數(shù)二306 +8 | z1z2z3879 2026-03-18 | 8/400 |
|
|
[考研] 336化工調(diào)劑 +4 | 王大坦1 2026-03-23 | 5/250 |
|
|
[考研] 0854電子信息求調(diào)劑 324 +3 | Promise-jyl 2026-03-23 | 3/150 |
|
|
[考研] 北科281學(xué)碩材料求調(diào)劑 +8 | tcxiaoxx 2026-03-20 | 9/450 |
|
|
[考研]
|
酥酥魚.. 2026-03-21 | 4/200 |
|
|
[考研] 260求調(diào)劑 +3 | 朱芷琳 2026-03-20 | 4/200 |
|
|
[考研] 化學(xué)調(diào)劑 +5 | yzysaa 2026-03-21 | 5/250 |
|
|
[考研] 一志愿深大,0703化學(xué),總分302,求調(diào)劑 +4 | 七月-七七 2026-03-21 | 4/200 |
|
|
[考研] 336求調(diào)劑 +5 | rmc8866 2026-03-21 | 5/250 |
|
|
[考研] 268求調(diào)劑 +9 | 簡單點0 2026-03-17 | 9/450 |
|
|
[考研] 301求調(diào)劑 +10 | yy要上岸呀 2026-03-17 | 10/500 |
|
|
[考研] 華東師范大學(xué)-071000生物學(xué)-293分-求調(diào)劑 +3 | 研究生何瑤明 2026-03-18 | 3/150 |
|
|
[考研] 296求調(diào)劑 +6 | www_q 2026-03-18 | 10/500 |
|
|
[考研] 一志愿 西北大學(xué) ,070300化學(xué)學(xué)碩,總分287,雙非一本,求調(diào)劑。 +4 | 晨昏線與星海 2026-03-19 | 4/200 |
|
|
[考研]
|
然11 2026-03-19 | 4/200 |
|
|
[考研] 【同濟軟件】軟件(085405)考研求調(diào)劑 +3 | 2026eternal 2026-03-18 | 3/150 |
|