24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1096  |  回复: 4
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

陈成龙

木虫 (小有名气)

[求助] 100BB急求matlab编程中的问题解决,如何修改这个程序呢?

首先谢谢大家的关照!
下面是matlab编程的主文件代码:(贴出来大家看看)
clear all
global basemesh
global disp
xnod=[0 1 1 0]';ynod=[0,0,1 1]';
nodes=[1 2 3 4];
for i=1:1
        [nodes,xnod,ynod]=refine(nodes,xnod,ynod);
end
hangnode=[]; % No hanging nodes on the first mesh
icase=2; % 1 for volume load, 2 for boundary tractions

[ux,uy]=solve(icase,nodes,xnod,ynod,hangnode);

tol=1e-5;err=1e9;stopp=1;effp=[];iite=0;mite=20;
while(err>stopp & iite < mite)
    iite=iite+1;
        [err,stopp,ellist,eff,epsx,epsy,epsxy]=errcal(icase,ux,uy,nodes,xnod,ynod,hangnode,tol);
        effp=[effp,eff];
        eps=1;
    ppp=epsx.*epsx+epsy.*epsy+epsxy.*epsxy/2;
         figure(1),clf,patch(xnod(nodes')+eps*ux(nodes'),ynod(nodes')+eps*uy(nodes'),'w'),hold on
     plot([0.8,1.5],eps*[disp,disp],'k-'),plot([0.8,0.8],[-0.4,eps*disp],'k-'),drawnow
        if(err     [nodes,xnod,ynod,hangnode]=refine_local(nodes,xnod,ynod,ellist);
        [ux,uy]=solve(icase,nodes,xnod,ynod,hangnode);minuy=min(uy)
end
%figure(2),plot(effp,'-o'),axis([1 length(effp) 0 1.5])


其他的.m文件在附件中,运行主文件之后的结果如下:

我想把:

中标出的正方形变成(修改成)圆,或者是三维的球体。

麻烦大家指点迷津!
其他的完整的文件在附件里面。
谢谢啦![ Last edited by 陈成龙 on 2011-8-13 at 08:32 ]
回复此楼

» 猜你喜欢

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

一个热爱书籍的孩子,欢迎加入小木虫读书群:202871828【民间组织,非诚勿扰】
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Rick_w

金虫 (小有名气)

【答案】应助回帖

陈成龙(金币+5): 感谢提醒!我的账号老久没用了 2011-08-14 18:28:22
对了
我想到了
不过我是不太明白
给你指点个方向吧
去这个论坛
http://www.ilovematlab.cn/index.php
人气很旺的
高手也很多
小木虫的话 资源和化学那块比较不错吧
对不住了  俺是小小虫 大二的而已  哈哈
3楼2011-08-14 17:18:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

陈成龙

木虫 (小有名气)

引用回帖:
2楼: Originally posted by Rick_w at 2011-08-14 17:16:11:
不懂...
帮顶

谢谢!
一个热爱书籍的孩子,欢迎加入小木虫读书群:202871828【民间组织,非诚勿扰】
4楼2011-08-14 18:27:08
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

陈成龙

木虫 (小有名气)

引用回帖:
3楼: Originally posted by Rick_w at 2011-08-14 17:18:06:
对了
我想到了
不过我是不太明白
给你指点个方向吧
去这个论坛
http://www.ilovematlab.cn/index.php
人气很旺的
高手也很多
小木虫的话 资源和化学那块比较不错吧
对不住了  俺是小小虫 大二 ...

谢谢!
一个热爱书籍的孩子,欢迎加入小木虫读书群:202871828【民间组织,非诚勿扰】
5楼2011-08-14 18:27:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 086003调剂求助 +7 苏弋万 2026-04-09 7/350 2026-04-09 08:49 by 科研毛毛虫化蝶
[考研] 工科 267求调剂 +6 wanwan00 2026-04-02 8/400 2026-04-08 22:09 by 朱云虎202
[考研] 一志愿211,化学学硕,310分,本科重点双非,求调剂 +10 努力奋斗112 2026-04-07 10/500 2026-04-08 15:01 by screening
[考研] 284求调剂 +17 梵@@ 2026-04-06 17/850 2026-04-08 11:35 by 1shin_ichi
[考研] 调剂 +3 电气300求调剂不 2026-04-08 6/300 2026-04-08 09:39 by 电气300求调剂不
[考研] 机械工程264学硕求调剂 +3 qiushangxian 2026-04-06 3/150 2026-04-08 01:53 by Linzejun
[考研] 331求调剂 +5 张元一 2026-04-07 6/300 2026-04-07 22:13 by hemengdong
[考研] 318求调剂 +5 李青山山山 2026-04-07 5/250 2026-04-07 18:24 by 蓝云思雨
[考研] 081700学硕,323分,一志愿中国海洋大学求调剂学校 +19 披星河 2026-04-04 19/950 2026-04-07 15:00 by 上岸快快
[考研] 求调剂 +5 小沢 2026-04-03 5/250 2026-04-06 22:45 by 875465
[考研] 081200-11408-276学硕求调剂 +5 崔wj 2026-04-05 5/250 2026-04-06 15:40 by lin-da
[考研] 一志愿西北农林畜牧专硕336分求调剂 +3 5ourr 2026-04-03 3/150 2026-04-05 10:40 by JOKER0401
[考研] 342求调剂 +3 Liang7111 2026-04-04 5/250 2026-04-04 19:47 by dongzh2009
[考研] 085602 找调剂 +4 逆时针快乐 2026-04-02 4/200 2026-04-04 19:32 by 蓝云思雨
[考研] 292求调剂 +11 2022080213 2026-04-04 13/650 2026-04-04 18:38 by macy2011
[考研] 372分材料与化工(085600)一志愿湖南大学求调剂 +3 蓝笺片 2026-04-03 4/200 2026-04-03 17:58 by Jimmyandyou
[考研] 320求调剂 +5 振—TZ 2026-04-02 5/250 2026-04-03 14:42 by fxue1114
[考研] 085501一志愿天工大,机械专硕求调剂,跨材料 +3 33上 2026-04-03 3/150 2026-04-03 14:08 by 1753564080
[考研] 315求调剂 +6 顺理成张 2026-04-03 8/400 2026-04-03 14:04 by 百灵童888
[考研] 296求调剂 +4 sdhu 2026-04-02 4/200 2026-04-02 21:29 by baoball
信息提示
请填处理意见