应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » MATLAB/Mathematica » 5点差分格式解边值问题。。。求大神帮忙
81/1返回列表
查看: 1196  |  回复: 7
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

柱子234

新虫 (小有名气)

[求助] 5点差分格式解边值问题。。。求大神帮忙 已有1人参与

有没有类似的程序，哪位大神给我发一下，或者帮我写以下程序。
5点差分格式解边值问题。。。求大神帮忙
IMG_20151229_193059.jpg
回复此楼

» 猜你喜欢
1楼 2015-12-29 19:34:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

米米米BO

金虫 (初入文坛)
把差分方程写出来，直接可以在Excel里面算

发自小木虫Android客户端
赞一下 回复此楼
2楼2015-12-29 19:55:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

柱子234

新虫 (小有名气)
引用回帖:
2楼: Originally posted by 米米米BO at 2015-12-29 19:55:20
把差分方程写出来，直接可以在Excel里面算

下面别人的程序，我该如何利用我的问题里面的边值条件呢？

function [ u x y k]=wudianchafenfa1(h,m,n,kmax,ep)
% g-s迭代法解五点差分法问题
%kmax为最大迭代次数
%m,n为x,y方向的网格数，例如（2-0）/0.01=200;aa
syms temp;
u=zeros(n+1,m+1);
x=-1+(0:m)*h;
y=-1+(0:n)*h;
for(i=1:n+1)
    u(i,1)=sin(3*pi/4+pi*y(i)/4);
    u(i,m+1)=sin(3*pi/4+pi*y(i)/4);
end
for(i=1:n)
    for(j=1:m)
        f(i,j)=32*u(i,j);
    end
end
t=zeros(n-1,m-1);
for(k=1:kmax)
    for(i=2:n)
        for(j=2:m)
            temp=h*h*f(i,j)/4+(u(i,j+1)+u(i,j-1)+u(i+1,j)+u(i-1,j))/4;
            t(i,j)=(temp-u(i,j))*(temp-u(i,j));
            u(i,j)=temp;
        end
    end
    t(i,j)=sqrt(t(i,j));
    if(k>kmax)
        break;
    end
    if(max(max(t))<ep)
        break;      
    end
end
赞一下 回复此楼
3楼2015-12-29 21:42:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

米米米BO

金虫 (初入文坛)

【答案】应助回帖

感谢参与，应助指数 +1
这是matlab写的啊，可以套在你的问题上，但改起来麻烦，我明天重新帮你写一个吧
赞一下 回复此楼
4楼2015-12-30 00:13:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

柱子234

新虫 (小有名气)
引用回帖:
4楼: Originally posted by 米米米BO at 2015-12-30 00:13:43
这是matlab写的啊，可以套在你的问题上，但改起来麻烦，我明天重新帮你写一个吧

感谢大神啊！方便加你Qq？

[ 发自手机版 http://muchong.com/3g ]
赞一下 回复此楼
5楼2015-12-30 07:36:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

米米米BO

金虫 (初入文坛)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
柱子234: 金币+20, ★★★★★最佳答案 2015-12-31 08:57:13
clear,clc;
n=9;            % grid number
h=0.25;         % step length
u=zeros(n,n);  
u(:,1)=1;       % top boundary
u(:,n)=0;       % bottom boundary
for k=1:1000    % maximum iteration
    u0=u;   
    % left boundary
    u(2,2:n-1)=(u(3,2:n-1)+u(2,1:n-2)+u(2,3:n)-0.5*h)/5.0;
    u(1,2:n-1)=u(2,2:n-1)-0.5*h;
    % right boundary
    u(n-1,2:n-1)=(u(n-2,2:n-1)+u(n-1,1:n-2)+u(n-1,3:n)-0.5*h)/5.0;
    u(n,2:n-1)=u(n-1,2:n-1)-0.5*h;
    % middle grid
    u(3:n-2,2:n-1)=(u(2:n-3,2:n-1)+u(4:n-1,2:n-1)+u(3:n-2,1:n-2)+u(3:n-2,3:n))/6.0;
    delta=max(max(abs(u-u0)));
    if(delta<1e-8)  % precision
        disp(['Number of iteration: ',num2str(k)]);
        disp(u');
        break;
    end
end
运行下这个试试
赞一下 回复此楼
6楼2015-12-30 10:13:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

米米米BO

金虫 (初入文坛)
引用回帖:
6楼: Originally posted by 米米米BO at 2015-12-30 10:13:51
clear,clc;
n=9;            % grid number
h=0.25;         % step length
u=zeros(n,n);  
u(:,1)=1;       % top boundary
u(:,n)=0;       % bottom boundary
for k=1:1000    % maximum iteration
    ...

上下边界那个标注反了
赞一下 回复此楼
7楼2015-12-30 10:16:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

柱子234

新虫 (小有名气)
引用回帖:
7楼: Originally posted by 米米米BO at 2015-12-30 10:16:32
上下边界那个标注反了...

这个就是我的那个问题吗？大神。。。感谢啊！
赞一下 回复此楼
8楼2015-12-31 08:56:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 柱子234 的主题更新
81/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 面上项目filecode邪修 +4 西山十月 2026-08-09 6/300 2026-08-10 00:16 by liufeng0619
[基金申请] 这样的filecode谁见过 +10 布布和一二 2026-08-08 21/1050 2026-08-09 17:21 by 天神眷顾
[基金申请] filecode与中标关系的预测 +5 布布和一二 2026-08-07 5/250 2026-08-09 16:15 by 袁向阳007
[基金申请] fileCode有新解读？ +10 Tide man 2026-08-08 18/900 2026-08-09 12:55 by 仁砚薪传
[基金申请] 关于filecode，很负责任的告诉大家 +6 爱看书的可乐 2026-08-08 7/350 2026-08-08 22:13 by a_niu
[基金申请] 国基金的申报应该改成非等额制，评价高的钱多评价低的钱少，但是增加资助率 +7 a089 2026-08-07 7/350 2026-08-08 18:05 by gltch
[基金申请] 好奇怪的filecode +3 布布和一二 2026-08-08 4/200 2026-08-08 17:46 by zhanghaozhu
[基金申请] 关于filecode +4 布布和一二 2026-08-07 7/350 2026-08-07 22:55 by zhanghaozhu
[基金申请] 娱乐 +6 Tide man 2026-08-03 6/300 2026-08-07 22:40 by 铁帽子农民
[基金申请] 化学口download_prp&amp;fileCode的固定段好像这几天一直没变，有变的大神么？ +3 Tide man 2026-08-07 4/200 2026-08-07 22:39 by Tide man
[基金申请] 固定端突然变了，今天 +6 archvillain 2026-08-06 10/500 2026-08-07 16:03 by 医学老男孩
[基金申请] 听说今天filecode变了 +24 布布和一二 2026-08-06 47/2350 2026-08-07 16:02 by zhiyanjiang
[基金申请] filecode变化情况 +6 布布和一二 2026-08-07 22/1100 2026-08-07 14:45 by 且听虎啸
[基金申请] 大家散了吧，后缀研究没有意义，别浪费时间了，过好目前的每一天，不要焦虑 +5 Tide man 2026-08-06 7/350 2026-08-07 13:11 by 医学老男孩
[基金申请] filecode +8 布布和一二 2026-08-06 11/550 2026-08-06 20:41 by tangpu318
[基金申请] 求各位大神看下 100+6 hpkpkpkp 2026-08-05 33/1650 2026-08-06 14:49 by zhiyanjiang
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
[基金申请] 8月时间戳变的，举个手。玩一下，释放压力 +9 archvillain 2026-08-04 11/550 2026-08-05 20:06 by wlwhappy
[基金申请] 好消息？这个有何含义？？？ +8 Tide man 2026-08-05 10/500 2026-08-05 16:14 by xmuxiaoyu
[基金申请] 纯娱乐，不喜欢勿喷 +7 Tide man 2026-08-04 10/500 2026-08-04 15:10 by loufangrui
信息提示
关闭
请填处理意见
关闭