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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » MATLAB/Mathematica » 我用matlab编写了一个风力机叶片的优化设计程序，有点问题
北京石油化工学院2026年研究生招生接收调剂公告
51/1返回列表
查看: 2827  |  回复: 13
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

743832049

新虫 (初入文坛)

[求助] 我用matlab编写了一个风力机叶片的优化设计程序，有点问题 已有1人参与

主程序
clear;
global r;
global R;
global phi;
global lamb;
V1=7;P=400;lamb0=6;B=3;
D=2.5;
R=D/2;                                                                     
N=60*lamb0*V1/pi/D;                                                        
omiga=V1*lamb0/R;
    r=0.1*R;                                                                                   %当前只进行0.1R处翼型截面的气动力计算试一试                                                            
    a0=lamb0^2/2000+0.027*lamb0-0.038;                                                              
    b0=10/lamb0/exp(12*r/R);
    lamb=lamb0*r/R;
    x0=[a0;b0];
    for i=1:10
    lb=[0;0];
    ub=[0.5;1];
    options=optimset('largescale','off','Algorithm','active-set');                                                         
    [x,fval]=fmincon('objfun',x0,[],[],[],[],lb,ub,'confun',options);                                 
   a=x.(1);
    b=x.(2);
    xi=x;
    if((abs(a-a0)<=0.00001)&&(abs(b-b0)<=0.00001)),break,end                                                                  
    x0=xi;                                         
    end                                                                    
    C0=0.21897;
    for i=0:10                                                         
    Re=[100000 500000 1000000 2000000 3000000 4000000 5000000 9000000];   
    Cl=[1.2424 1.0853 1.001 0.9616 0.9663 0.9693 0.9016 1.0023];
    alpha=[8 6 5 4.5 4.5 4.5 4 5];
    Re(i)=V1*(1-a)*C0/1.48e-5/sin(phi);                                      
    Cl(i)=interpi(Re,Cl,Re(i),'spline');                                       
    alpha(i)=interpi(Re,alpha,Re(i),'spline');                                
    S=8*pi*sin(phi)*sin(phi)*(1-a*F)*a*F/cos(phi)/(1-a)^2;               
    C(i+1)=S*r/B/Cl(i);                                                      
    C=C(i+1);                                                              
    if(abs(C-C0)<=0.00001),break,end                                                
    C0=C(i+1);                                                            
    end                                                                    
    theta=phi-alpha(i);                                                      
printf(fid,'%f\t%f\t%f\t%f\t%f\t%f\t%f\t%f\t%f\t%f\t%f\n',a,b);


目标函数
function fval=objfun(x0)                                                     
global lamb0;
global B;
global R;
global r;
global phi;
lamb=lamb0*r/R;
phi=atan((1-x0.(1))/(1+x0.(2))/lamb);
f=B*(R-r)/2/r/sin(phi);
F=2*acos(exp(-f))/pi;
fval=-8*x0.(2)*(1-x0.(1))*F*lamb^3/lamb0^2;



条件函数
function [c,ceq]=confun(x0)                                                
global lamb0;
global B;
global R;
global r;
global phi;
lamb=lamb0*r/R;
phi=atan((1-x0.(1))/(1+x0.(2))/lamb);
f=B*(R-r)/2/r/sin(phi);
F=2/pi*acos(exp(-f));
ceq=x0.(1)*(1-x0.(1)*F)-x0.(2)*(1+x0.(2))*lamb^2;
c=[];


程序采用的是Wilson算法，但是在MATLAB中运行的时候总是出问题。我是菜鸟，该程序是边学边做的，可能有出错的地方，望大侠们帮帮吧。。。
回复此楼

» 收录本帖的淘帖专辑推荐

学。

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2013-12-04 10:28:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yqsky610

禁虫 (小有名气)
本帖内容被屏蔽
9楼2013-12-12 20:47:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 14 个回答

云海孤狼

银虫 (正式写手)
我也想做优化，是离心风机叶轮的，你是用什么书学习的呢?
赞一下 回复此楼
2楼2013-12-07 21:00:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yqsky610

禁虫 (小有名气)
本帖内容被屏蔽
3楼2013-12-08 10:55:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

743832049

新虫 (初入文坛)
引用回帖:
2楼: Originally posted by 云海孤狼 at 2013-12-07 21:00:05
我也想做优化，是离心风机叶轮的，你是用什么书学习的呢?

我就用学习了一下matlab基础教程，然后再在网上找了点资料自己学着编的，都不知道编的对不对。。。因为论文要优化叶片，所以才学编程。
赞一下 回复此楼
4楼2013-12-11 15:30:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 14 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 296材料专硕求调剂 +17 202451007219 2026-04-02 18/900 2026-04-02 23:14 by 马儿快快地跑
[考研] 081200-11408-276学硕求调剂 +5 崔wj 2026-04-02 5/250 2026-04-02 22:54 by pphmily
[考研] 282求调剂 +3 aaa车辆 2026-04-02 3/150 2026-04-02 21:55 by zllcz
[考研] 324求调剂 +11 想上学求调 2026-04-02 11/550 2026-04-02 21:23 by 帕尔马拉特
[考研] 一志愿华南师范大学-22408计算机-292分-求华南师范大学调剂 +4 爱读书的小鳄鱼 2026-04-02 4/200 2026-04-02 18:35 by 求调剂zz
[考研] 085600，材料与化工321分求调剂 +11 大馋小子 2026-03-28 11/550 2026-04-02 15:59 by yunlongyang
[考研] 调剂 +3 好好读书。 2026-04-01 6/300 2026-04-02 15:49 by liumengping
[考研] 材料化工340求调剂 +5 jhx777 2026-03-30 5/250 2026-04-02 12:45 by smileboy2006
[考研] 求调剂推荐 +3 南山南@ 2026-04-01 3/150 2026-04-02 12:09 by xiaoranmu
[考研] 311求调剂 +9 勇敢的小吴 2026-04-02 9/450 2026-04-02 11:37 by Sammy2
[考研] 320分，材料与化工专业，求调剂 +14 一定上岸aaa 2026-03-27 18/900 2026-04-01 20:10 by 积极调剂的小学�
[考研] 求调剂 +4 图鉴212 2026-03-30 5/250 2026-04-01 15:32 by 图鉴212
[考研] 材料专硕306英一数二 +7 z1z2z3879 2026-03-31 7/350 2026-04-01 14:50 by ZXlzxl0425
[考研] 一志愿南昌大学324求调剂 +7 hanamiko 2026-03-30 7/350 2026-04-01 13:22 by JourneyLucky
[考研] 318求调剂 +8 七忆77 2026-04-01 8/400 2026-04-01 10:37 by Jaylen.
[考研] 一志愿武理材料工程302调剂环化或化工 +15 Doleres 2026-03-31 16/800 2026-04-01 09:49 by lfj11
[考研] 333求调剂 +4 阿科逸 2026-03-31 4/200 2026-04-01 09:11 by jp9609
[考研] 求调剂 生物学 377分 +6 zzll03 2026-03-31 6/300 2026-03-31 17:33 by 唐沐儿
[考博] 材料专业申博 +5 杜雨婷dyt 2026-03-29 5/250 2026-03-31 11:19 by oooqiao
[考研] 370求调剂 +3 080700调剂 2026-03-30 3/150 2026-03-31 01:09 by A_Zhe
信息提示
关闭
请填处理意见
关闭