24小时热门版块排行榜    

查看: 914  |  回复: 6

chenhu0424

铁杆木虫 (著名写手)

[求助] 求写一个matlab的程序 已有3人参与

需要求解的方程公式为x = solve('(K)*(0.05)*((500E-6)-x)^2=x^2')
需要得到方程的所有实数解 K值为 1.54E+14        2.63E+13        5.03E+12        1.07E+12        2.52E+11        6.47E+10        1.80E+10        5.38E+09        1.72E+09        5.85E+08        2.11E+08        8.00E+07        3.19E+07        1.33E+07        5.77E+06        2.61E+06        1.22E+06        5.92E+05        2.96E+05        1.52E+05        8.07E+04        4.38E+04        2.44E+04        1.39E+04        8.10E+03        4.82E+03        2.92E+03        1.80E+03        1.13E+03        7.22E+02        4.68E+02        3.08E+02        2.06E+02        1.39E+02        9.52E+01        6.60E+01        4.63E+01        3.28E+01        2.35E+01        1.70E+01        1.24E+01        9.17E+00        6.82E+00        5.12E+00        3.87E+00        2.95E+00        2.27E+00        1.75E+00        1.36E+00        1.07E+00        8.43E-01
只能是一个一个求 不会写程序 求帮助
回复此楼

» 猜你喜欢

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

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

chenhu0424

铁杆木虫 (著名写手)

自己顶一下
星空夜思
2楼2015-07-21 16:22:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hsdwlxhx

金虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
用(x)@(....),形式定义函数式

[ 发自小木虫客户端 ]
BringLightonChip
3楼2015-07-21 16:36:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chenhu0424

铁杆木虫 (著名写手)

引用回帖:
3楼: Originally posted by hsdwlxhx at 2015-07-21 16:36:24
用(x)@(....),形式定义函数式

你能不能给写一个完整的程序 然后我能直接得出结果 非常感谢
星空夜思
4楼2015-07-21 16:43:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hsdwlxhx

金虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★
chenhu0424: 金币+5, 先给你5个 表示下诚心 但是你写的真的看不懂 能不能直接给写出来 然后我复制黏贴直接用 如果你嫌数据多麻烦 可以列举上两个代表一下 非常感谢 2015-07-21 17:07:33
引用回帖:
4楼: Originally posted by chenhu0424 at 2015-07-21 16:43:50
你能不能给写一个完整的程序 然后我能直接得出结果 非常感谢...

金币不能少,k是数组,for i=1:100   kt=k(i); func = @(x)(kt*...函数形式.);temp(i)=solve(func); end

[ 发自小木虫客户端 ]
BringLightonChip
5楼2015-07-21 16:58:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ybkooo

至尊木虫 (著名写手)

^^

【答案】应助回帖

感谢参与,应助指数 +1
kk=ones(2,51);
格式可能是这样,但运行错误……有人给改改吗?
for i=1:51;
    K=a(i);%把K数据复制到txt导入到Workspace,命名为a
    x1=@(t) (sqrt(K*0.05)*(500E-6))/(sqrt(K*0.05)+1);
    x2=@(t) (sqrt(K*0.05)*(500E-6))/(sqrt(K*0.05)-1);
    xx1 = solve('x1')
    xx2 = solve('x2')
    kk(1,i)=xx1;
    kk(2,i)=xx2;
end
abcd
6楼2015-07-21 17:14:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

月只蓝

主管区长 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
仅供参考:
CODE:
function solve_eq1
clear all;clc
format long

syms x

k_data=[1.54E+14        2.63E+13        5.03E+12        1.07E+12        2.52E+11        6.47E+10        1.80E+10        5.38E+09        1.72E+09        5.85E+08        2.11E+08        8.00E+07        3.19E+07        1.33E+07        5.77E+06        2.61E+06        1.22E+06        5.92E+05        2.96E+05        1.52E+05        8.07E+04        4.38E+04        2.44E+04        1.39E+04        8.10E+03        4.82E+03        2.92E+03        1.80E+03        1.13E+03        7.22E+02        4.68E+02        3.08E+02        2.06E+02        1.39E+02        9.52E+01        6.60E+01        4.63E+01        3.28E+01        2.35E+01        1.70E+01        1.24E+01        9.17E+00        6.82E+00        5.12E+00        3.87E+00        2.95E+00        2.27E+00        1.75E+00        1.36E+00        1.07E+00        8.43E-01];
m=length(k_data);
for i=1:m
    k=k_data(i);
    a = solve('k*0.05*( (500E-6)-x )^2=x^2');
    b(:,i)=eval(a);
end
x=b'

   

计算结果:
x =

   0.000500000180188   0.000499999819813
   0.000500000436021   0.000499999563980
   0.000500000997015   0.000499999002989
   0.000500002161698   0.000499997838321
   0.000500004454394   0.000499995545686
   0.000500008791045   0.000499991209264
   0.000500016667222   0.000499983333889
   0.000500030487397   0.000499969516321
   0.000500053922201   0.000499946089427
   0.000500092467130   0.000499907567058
   0.000500153984676   0.000499846110111
   0.000500250125063   0.000499750124938
   0.000500396217519   0.000499604409440
   0.000500613892142   0.000499387611619
   0.000500932623614   0.000499070842602
   0.000501387933384   0.000498619729510
   0.000502032670869   0.000497983722842
   0.000502923181617   0.000497110603309
   0.000504144038469   0.000495923533664
   0.000505801946234   0.000494329650028
   0.000507997229778   0.000492250663132
   0.000510917641806   0.000489539187796
   0.000514736873828   0.000486083470717
   0.000519713870787   0.000481727051403
   0.000526144321532   0.000476330925993
   0.000534425363951   0.000469741302716
   0.000545113951633   0.000461782600091
   0.000558914792025   0.000452321163031
   0.000576726560263   0.000441291457755
   0.000599833725845   0.000428656302645
   0.000630298094843   0.000414344762300
   0.000670982061600   0.000398462382845
   0.000726309747698   0.000381217134023
   0.000805570190361   0.000362497036530
   0.000923104045602   0.000342853401206
   0.001112302220100   0.000322480388596
   0.001458749964057   0.000301706309707
   0.002281738162099   0.000280761837901
   0.006454211912668   0.000260073801617
  -0.005906514819098   0.000239848152431
  -0.001851843141317   0.000220264193949
  -0.001048593056961   0.000201870988633
  -0.000701784562084   0.000184333879231
  -0.000512072866685   0.000167986845179
  -0.000392675975796   0.000152750371332
  -0.000311763804923   0.000138743277064
  -0.000254031365233   0.000125999780349
  -0.000210029583099   0.000114139172140
  -0.000176377734017   0.000103416360627
  -0.000150449376717   0.000093925340795
  -0.000129171922366   0.000085167119944
MATLAB、MS小问题、普通问题请发帖求助!时间精力有限,恕不接受无偿私信求助。
7楼2015-07-24 16:09:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 chenhu0424 的主题更新
信息提示
请填处理意见