MATLAB 偏微分方程数值解function U = finedif(f,g,a,b,c,n,m)h=a/(n-1);k=b/(m-1);r=c*k/h;r2=r^2;r22=r^2/2;s1=1-r^2;s2=2-2*r^2;U=zeros(n,m);for i=2:n-1 U(i,1)=feval(f,h*(i-1)); U(i,2)=s1*feval(f,h*(i-1))+k*feval(g,h*(i-1)) ... +r22*(
来源:学生作业帮助网 编辑:作业帮 时间:2024/08/02 20:05:35
![MATLAB 偏微分方程数值解function U = finedif(f,g,a,b,c,n,m)h=a/(n-1);k=b/(m-1);r=c*k/h;r2=r^2;r22=r^2/2;s1=1-r^2;s2=2-2*r^2;U=zeros(n,m);for i=2:n-1 U(i,1)=feval(f,h*(i-1)); U(i,2)=s1*feval(f,h*(i-1))+k*feval(g,h*(i-1)) ... +r22*(](/uploads/image/z/6117268-4-8.jpg?t=MATLAB+%E5%81%8F%E5%BE%AE%E5%88%86%E6%96%B9%E7%A8%8B%E6%95%B0%E5%80%BC%E8%A7%A3function+U+%3D+finedif%28f%2Cg%2Ca%2Cb%2Cc%2Cn%2Cm%29h%3Da%2F%28n-1%29%3Bk%3Db%2F%28m-1%29%3Br%3Dc%2Ak%2Fh%3Br2%3Dr%5E2%3Br22%3Dr%5E2%2F2%3Bs1%3D1-r%5E2%3Bs2%3D2-2%2Ar%5E2%3BU%3Dzeros%28n%2Cm%29%3Bfor+i%3D2%3An-1++++U%28i%2C1%29%3Dfeval%28f%2Ch%2A%28i-1%29%29%3B++++U%28i%2C2%29%3Ds1%2Afeval%28f%2Ch%2A%28i-1%29%29%2Bk%2Afeval%28g%2Ch%2A%28i-1%29%29+...++++++++%2Br22%2A%28)
MATLAB 偏微分方程数值解function U = finedif(f,g,a,b,c,n,m)h=a/(n-1);k=b/(m-1);r=c*k/h;r2=r^2;r22=r^2/2;s1=1-r^2;s2=2-2*r^2;U=zeros(n,m);for i=2:n-1 U(i,1)=feval(f,h*(i-1)); U(i,2)=s1*feval(f,h*(i-1))+k*feval(g,h*(i-1)) ... +r22*(
MATLAB 偏微分方程数值解
function U = finedif(f,g,a,b,c,n,m)
h=a/(n-1);
k=b/(m-1);
r=c*k/h;
r2=r^2;
r22=r^2/2;
s1=1-r^2;
s2=2-2*r^2;
U=zeros(n,m);
for i=2:n-1
U(i,1)=feval(f,h*(i-1));
U(i,2)=s1*feval(f,h*(i-1))+k*feval(g,h*(i-1)) ...
+r22*(feval(f,h*i)+feval(f,h*(i-2)));
end
for j=3:m,
for i=2:(n-1),
U(i,j)=s2*U(i,j-1)+r2*(U(i-1,j-1)+U(i+1,j-1))-U(i,j-2);
end
end
U=U';
第二行哪里错了
MATLAB 偏微分方程数值解function U = finedif(f,g,a,b,c,n,m)h=a/(n-1);k=b/(m-1);r=c*k/h;r2=r^2;r22=r^2/2;s1=1-r^2;s2=2-2*r^2;U=zeros(n,m);for i=2:n-1 U(i,1)=feval(f,h*(i-1)); U(i,2)=s1*feval(f,h*(i-1))+k*feval(g,h*(i-1)) ... +r22*(
memo1.Text:=memo1.Text+''''+edit1.Text+'''';
这要看你在memo1和edit1中写了些什么,memo1.text是表组件的过滤器