回 帖 发 新 帖 刷新版面

主题:[讨论]求教!高手帮忙我的M-file 請問如何找到 L 的最小值?

當Tac 和 Tab 都小於2000時,請問如何找到 L 的最小值? 
再加一個 While Loop?

[color=0000FF]L=3:0.1:6.7;
th = acos((45-L.^2)/36);
ph = asin((6*sin(th))./L);

j=1;

Tab = 2000./(sin(th)+cos(th).*tan(ph));
if Tab<2000 then
Tac = (2000.*cos(th))./(sin(th)+cos(th).*tan(ph));
if Tac<2000 then
ARRAY(j)=(L,Tab,Tac)
j=j+1;
end
end

plot(ARRAY(:,1),ARRAY(:,2),'m',ARRAY(:... of AC'),ylabel('Tension'),title('Tension Plot');
legend('Tab','Tac'); [/color]

回复列表 (共1个回复)

沙发

L由最小的開始,利用while迴圈判斷何時Tab或Tac會大於2000,若同時都小於2000就停下來,併記錄j,也就是L的最小長度L(j)



L=3:0.01:6.7;
th = acos((45-L.^2)/36);
ph = asin((6*sin(th))./L);
Tab = 2000./(sin(th)+cos(th).*tan(ph));
Tac = (2000.*cos(th))./(sin(th)+cos(th).*tan(ph));



j=1;
while Tab(j)>=2000 | Tac(j)>=2000
    j=j+1;
end
L(j)






執行結果



L =



    3.4000

我来回复

您尚未登录,请登录后再回复。点此登录或注册