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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 数学 » 计算数学 » matlab求助
41/1返回列表
查看: 917  |  回复: 3
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

周亦良

金虫 (小有名气)

[求助] matlab求助 已有1人参与

clear
clc
t=0.3;
vs=100;
vv=187;
yd=16;
yst=19;
yw=10;
kh1=0.6，kh1=0.1两种情况;
h=10;
ru=0.2;
b=0.2*h;
h=0.75*h;
b=30*pi/180;
d=b/2;
c=10*pi/180;
a=0:0.01*pi/180:pi/2;
t=0:0.001:0.3;
yy=((h/h)^2*yst+(1-(h/h)^2)*yd)
kh=yst*kh1/(yy*(1-ru))
kv=0.5*kh;
m1=t*vs*kh*(1+tan(a)*tan(c))/(2*pi^2*h^2*tan(a))*(2*pi*h*cos(2*pi*(t/t-h/(t*vs)))+t*vs*(sin(2*pi*(t/t-h/(t*vs)))-sin(2*pi*t/t)));
m2=t*vv*kv*(1+tan(a)*tan(c))/(2*pi^2*h^2*tan(a))*(2*pi*h*cos(2*pi*(t/t-h/(t*vv)))+t*vv*(sin(2*pi*(t/t-h/(t*vv)))-sin(2*pi*t/t)));
ke=(1+tan(a)*tan(c))*sin((a+b))/tan(a)/cos((a+b+d-c))-m1*cos((a+b))/cos((a+b+d-c))-m2*sin((a+b))/cos((a+b+d-c))
麻烦用matlab写出求得ke分别在kh1=0.6，kh1=0.1两种情况下的最小值（ke为正的最小值）程序，以及相应a，t的值
回复此楼

» 猜你喜欢
1楼 2022-11-07 17:48:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyh700600

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
感谢参与，应助指数 +1
周亦良: 金币+70, ★★★★★最佳答案 2022-11-09 17:48:09
CODE:
  

kh1=0.38;

options = optimset('MaxFunEvals',1600);
[x,fval,exitflag] = fminsearch(@(x) Kem(x(1),x(2)),[0.01, 1.3],options)

经过试算， kh1 不能起过 0.38 。超过后无法求解。

1. 你可以依据你的专业知识，选择更为适当的初值 [0.01, 1.3]；
2. 你也可以依据你的专业知识，判断 kh1 可能的取值区间。

CODE:
  


clear; clc
format long g

T=0.3;
Vsw=2500;
Vvw=3900;
Vs=100;
Vv=187;
yc=25;
yd=16;
yst=19;
yw=10;

kh1=0.38;

H=10;
ru=0.2;
b=0.2*H;
h=0.75*H;
B=30*pi/180;
D=B/2;
C=10*pi/180;

% A=0:0.01*pi/180:pi/2;
%  t=0:0.001:0.3;

syms A t

yy=((h/H)^2*yst+(1-(h/H)^2)*yd);
kh=yst*kh1/(yy*(1-ru));
kv=0.5*kh;

m1=T*Vs*kh*(1+tan(A)*tan(C))/(2*pi^2*H^2*tan(A))*(2*pi*H*cos(2*pi*(t/T-H/(T*Vs)))+T*Vs*(sin(2*pi*(t/T-H/(T*Vs)))-sin(2*pi*t/T)));
m2=T*Vv*kv*(1+tan(A)*tan(C))/(2*pi^2*H^2*tan(A))*(2*pi*H*cos(2*pi*(t/T-H/(T*Vv)))+T*Vv*(sin(2*pi*(t/T-H/(T*Vv)))-sin(2*pi*t/T)));
Ke = (1+tan(A)*tan(C))*sin((A+B))/tan(A)/cos((A+B+D-C))-m1*cos((A+B))/cos((A+B+D-C))-m2*sin((A+B))/cos((A+B+D-C));

Kem = matlabFunction(Ke);

%  [x,fval,exitflag] = fminsearch(@(x) Kem(x(1),x(2)),[0.1, 1.1])

options = optimset('MaxFunEvals',1600);
[x,fval,exitflag] = fminsearch(@(x) Kem(x(1),x(2)),[0.01, 1.3],options)


A0 = x(1)
t0 = x(2)
Ke_min = fval
赞一下(2人) 回复此楼
2楼2022-11-08 13:06:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

周亦良

金虫 (小有名气)
引用回帖:
2楼: Originally posted by zyh700600 at 2022-11-08 13:06:19
kh1=0.38;

options = optimset('MaxFunEvals',1600);
= fminsearch(@(x) Kem(x(1),x(2)),,options)

经过试算， kh1 不能起过 0.38 。超过后无法求解。

1. 你可以依据你的专业知识，选择更为适当的 ...

好的，非常感谢

发自小木虫Android客户端
回复此楼
3楼2022-11-09 17:47:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyh700600

金虫 (小有名气)
引用回帖:
3楼: Originally posted by 周亦良 at 2022-11-09 17:47:55
好的，非常感谢
...

CODE:




clear
clc

t=0.3;
vs=100;
vv=187;
yd=16;
yst=19;
yw=10;

% kh1=0.6，kh1=0.1两种情况;

kh1=0.1;

h=10;
ru=0.2;
b=0.2*h;
h=0.75*h;
b=30*pi/180;
d=b/2;
c=10*pi/180;

% a=0:0.01*pi/180:pi/2;
% t=0:0.001:0.3;

syms a t

yy=((h/h)^2*yst+(1-(h/h)^2)*yd);
kh=yst*kh1/(yy*(1-ru));
kv=0.5*kh;

m1=t*vs*kh*(1+tan(a)*tan(c))/(2*pi^2*h^2*tan(a))*(2*pi*h*cos(2*pi*(t/t-h/(t*vs)))+t*vs*(sin(2*pi*(t/t-h/(t*vs)))-sin(2*pi*t/t)));
m2=t*vv*kv*(1+tan(a)*tan(c))/(2*pi^2*h^2*tan(a))*(2*pi*h*cos(2*pi*(t/t-h/(t*vv)))+t*vv*(sin(2*pi*(t/t-h/(t*vv)))-sin(2*pi*t/t)));
ke=(1+tan(a)*tan(c))*sin((a+b))/tan(a)/cos((a+b+d-c))-m1*cos((a+b))/cos((a+b+d-c))-m2*sin((a+b))/cos((a+b+d-c));

Kem = matlabFunction(ke);

options = optimset('MaxFunEvals',1600);
[x,fval,exitflag] = fminsearch(@(x) Kem(x(1),x(2)),[0.01, 1.3],options)


A0 = x(1)
t0 = x(2)
Ke_min = fval



CODE:



计算结果：

kh1=0.1;

A0 =    0.4336

t0 =  2.2050e+004

Ke_min =    3.8021


..................

kh1=0.6;

A0 =    0.4328

t0 =  2.3096e+004

Ke_min =    3.8022
赞一下 回复此楼
4楼2022-11-09 18:23:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 周亦良 的主题更新
41/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 中国科学技术大学材料与化工281求调剂，有科研和获奖经历 +6 wsxw 2026-03-02 6/300 2026-03-02 23:49 by 半截的诗0927
[考研] 接收调剂 +7 津萌津萌 2026-03-02 15/750 2026-03-02 23:48 by hcy618
[考研] 求调剂院校 +4 云朵452 2026-03-02 6/300 2026-03-02 23:30 by 红桃灼灼
[考研] 调剂 +5 13853210211 2026-03-02 6/300 2026-03-02 22:10 by 无际的草原
[考研] 268求调剂 +8 简单点0 2026-03-02 12/600 2026-03-02 21:42 by sunny81
[考研] 求调剂 +7 repeatt?t 2026-02-28 7/350 2026-03-02 20:34 by hypershenger
[考研] 085600求调剂 +4 LRZZZZZZ 2026-03-02 5/250 2026-03-02 20:33 by 云旗yunqi
[考研] 0856求调剂285 +11 吕仔龙 2026-02-28 11/550 2026-03-02 20:15 by hypershenger
[考研] 材料284求调剂，一志愿郑州大学英一数二专硕 +15 想上岸的土拨鼠 2026-02-28 15/750 2026-03-02 20:13 by hypershenger
[考研] 0854总分272 +3 打小就是老实人 2026-03-02 4/200 2026-03-02 19:49 by 求调剂zz
[考研] 283求调剂 +5 鹿沫笙 2026-03-02 5/250 2026-03-02 19:19 by zhukairuo
[考研] 284求调剂 +5 天下熯 2026-03-02 5/250 2026-03-02 18:38 by caszguilin
[考研] 290求调剂 +6 ErMiao1020 2026-03-02 6/300 2026-03-02 18:14 by lature00
[考研] 一志愿东北大学化学314分求调剂 +3 lr1212.. 2026-03-02 3/150 2026-03-02 17:36 by yeahyou
[考研] 欢迎采矿、地质、岩土、计算机、人工智能等专业的同学报考 +6 pin8023 2026-02-28 8/400 2026-03-02 17:13 by 0854蹲调剂
[考研] 江苏省农科院招调剂1名 +4 Qwertyuop 2026-03-01 4/200 2026-03-02 14:27 by 升格阿达
[考研] 26考研报考西工大材料308分求调剂 +4 weizhong123 2026-03-01 4/200 2026-03-02 12:46 by 无际的草原
[考研] 化工专硕342，一志愿大连理工大学，求调剂 +6 kyf化工 2026-02-28 7/350 2026-03-02 10:56 by 无际的草原
[基金申请] 刚录用，没有期刊号，但是在线可看的论文可以放为代表作吗 10+3 arang1 2026-03-01 3/150 2026-03-01 16:43 by babero
[高分子] 求环氧树脂研发1名 +3 孙xc 2026-02-25 11/550 2026-02-28 16:57 by ichall
信息提示
关闭
请填处理意见
关闭