24小时热门版块排行榜    

查看: 470  |  回复: 2

090180119

金虫 (小有名气)

[求助] matlab的运行求助 已有1人参与

本人matlab不通,纯菜鸟一枚,现有代码如下:
主函数:(shuizhi)
function shuizhi
E(18)=0;
E(=2;
U(18)=0;
U(=5;
K=0.0151;
Cj(18)=0;
Cj(1)=10;
Dt=0.1;
Dx=0.5;
j=0;
while (j<10)
    Cj=HLSZAD(E,U,Dt,Dx,K,Cj);
    j=j+1;
    if j>=10
        Cj(1)=0;
    end
    n=length(Cj);
    fprintf('\n第%d′次各断面浓度\n',j)
    for i=1:n
        fprintf('\t%f',Cj(i));
    end        
end
子函数(HLSZAD)
function [Cj]=HLSZAD(E,U,Dt,Dx,K,Cj)
%E- j时刻各断面的纵向扩散系数
%U-j时刻各断面的平均流速
%Dt-时间步长
%Dx-空间步长
%K-综合衰减系数
%Cj-j时刻各断面浓度
n=length(U)-1;
a(n)=0;
b(n)=0;
c(n)=0;
d(n)=0;
for i=1:n
    a(i)=-E(i+1)/Dx^2;
    b(i)=1/Dt+2*E(i+1)/Dx^2+K/2;
    c(i)=-E(i+1)/Dx^2;
    d(i)=Cj(i+1)*(1/Dt-U(i+1)/Dx)+Cj(i)*(U(i+1)/Dx-K/2);
end
A=zeros(n,n);
for i=1:n
    A(i,i)=b(i);
    if(i>1)
        A(i,i-1)=a(i);
    end
    if(i<n)
        A(i,i+1)=c(i);
    end
end
A(n,n-1)=a(n)-c(n);
A(n,n)=b(n)+2*c(n);
d(1)=d(1)-a(1)*Cj(1);
CK=fzhuigan(A,d);%解三对角方程
Cj(2:n+1)=CK;
子函数(fzhuigan)
function [x]=fzhuigan(A,b)
n=rank(A);
for i=1:n-1
    m=A(i+1,i)/A(i,i);
    A(i+1,i:i+1)=A(i+1,i:i+1)-m*A(i,i:i+1);
    b(i+1)=b(i+1)-m*b(i);
end
x=zeros(1,n);
x(n)=b(n)/A(n,n);
for i=n-1:-1:1
    x(i)=(b(i)-A(i,i+1)*x(i+1))/A(i,i);
end
不知道应如何运行 ,主函数和子函数一起复制在同一个板块吗,还望大神们不吝赐教,我自己鼓捣半天也没有鼓捣出来
回复此楼

» 猜你喜欢

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

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

090180119

金虫 (小有名气)

亲们,快来帮帮我吧
2楼2014-05-20 10:12:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dnp

荣誉版主 (知名作家)

小木虫浪子

优秀版主

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
090180119: 金币+5, ★★★★★最佳答案, 非常感谢 2014-05-21 11:05:57
把这两函数复制到同一个代码编辑文档中,如果不知道是什么,在matlab窗口运行edit,就会出来一个新的Editor窗口,复制到里面去之后保存,matlab会自动监测到主函数的名称(即shuizhi),保存成为shuizhi.m文件,然后在matlab窗口键入shuizhi运行即可。
PS: 所要运行的函数文件必须在当前的工作目录或matlab搜索路径下面,若不知道当前工作目录,键入cd回车就会出来当前目录,而要想将其加入matlab搜索路径下面,你需要自己上网查matlab是如何运行函数的,网上有很多详细的介绍。

祝好运。
What would Jesus do?
3楼2014-05-20 10:19:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 090180119 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 329求调剂 +5 想上学吖吖 2026-03-19 5/250 2026-03-19 23:56 by 23Postgrad
[论文投稿] 申请回稿延期一个月,编辑同意了。但系统上的时间没变,给编辑又写邮件了,没回复 10+3 wangf9518 2026-03-17 4/200 2026-03-19 23:55 by babero
[考研] 081700化工学硕调剂 +3 【1】 2026-03-16 3/150 2026-03-19 23:40 by edmund7
[考研] 288求调剂,一志愿华南理工大学071005 +5 ioodiiij 2026-03-17 5/250 2026-03-19 18:22 by zcl123
[考研] 324分 085600材料化工求调剂 +3 llllkkkhh 2026-03-18 3/150 2026-03-19 14:22 by houyaoxu
[考研] 0703化学调剂 +5 pupcoco 2026-03-17 8/400 2026-03-19 13:58 by houyaoxu
[考研] 一志愿 西北大学 ,070300化学学硕,总分287,双非一本,求调剂。 +3 晨昏线与星海 2026-03-19 3/150 2026-03-19 13:36 by houyaoxu
[考研] 0817调剂 +3 没有答案_ 2026-03-14 3/150 2026-03-19 09:51 by Xu de nuo
[考研] 304求调剂 +6 司空. 2026-03-18 6/300 2026-03-18 23:03 by 星空星月
[考研] 一志愿华中科技大学,080502,354分求调剂 +4 守候夕阳CF 2026-03-18 4/200 2026-03-18 22:16 by li123456789.
[考研] 085410人工智能专硕317求调剂(0854都可以) +3 xbxudjdn 2026-03-18 3/150 2026-03-18 22:14 by zhq0425
[考研] 330求调剂 +3 小材化本科 2026-03-18 3/150 2026-03-18 21:55 by 无懈可击111
[考研] 311求调剂 +4 冬十三 2026-03-18 4/200 2026-03-18 21:47 by 尽舜尧1
[考研] 26调剂/材料/英一数二/总分289/已过A区线 +7 步川酷紫123 2026-03-13 7/350 2026-03-18 17:12 by 尽舜尧1
[考研] 295求调剂 +3 一志愿京区211 2026-03-18 5/250 2026-03-18 17:03 by zhaoqian0518
[考研] 268求调剂 +6 简单点0 2026-03-17 6/300 2026-03-18 09:04 by 无际的草原
[硕博家园] 湖北工业大学 生命科学与健康学院-课题组招收2026级食品/生物方向硕士 +3 1喜春8 2026-03-17 5/250 2026-03-17 17:18 by ber川cool子
[考研] 308求调剂 +4 是Lupa啊 2026-03-16 4/200 2026-03-17 17:12 by ruiyingmiao
[考研] 332求调剂 +6 Zz版 2026-03-13 6/300 2026-03-17 17:03 by ruiyingmiao
[考研] 321求调剂 +5 大米饭! 2026-03-15 5/250 2026-03-16 16:33 by houyaoxu
信息提示
请填处理意见