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

24小时热门版块排行榜    

CyRhmU.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 计算模拟 » 求助matlab写循环
51/1返回列表
查看: 1154  |  回复: 6
只看楼主@他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

gaojinggigi

新虫 (正式写手)

[求助] 求助matlab写循环

各位大侠，我现在有以下程序，不知道怎么写循环，能不能帮我看一下？
a=0.8;
n=1.45;
f=100;
x0=a;y0=0;
gamma1=atan((x0+a)/(y0+f))
alpha1=gamma1/(n-1)
beta1=alpha1*n
l1=2*a*sin(alpha1)/cos(beta1)

x1=x0+(2*a+l1*cos(gamma1))
y1=y0+(l1*sin(gamma1))

gamma2=atan((x1+a)/(y1+f))
alpha2=gamma2/(n-1)
beta2=alpha2*n
l2=2*a*sin(alpha2)/cos(beta2)

x2=x1+(2*a+l2*cos(gamma2))
y2=y1+(l2*sin(gamma2))

gamma3=atan((x2+a)/(y2+f))
alpha3=gamma3/(n-1)
beta3=alpha3*n
l3=2*a*sin(alpha3)/cos(beta3)

x3=x2+(2*a+l3*cos(gamma3))
y3=y2+(l3*sin(gamma3))

在x<20,y<0.5时要一直算出xn，yn来，最后得出一组（x,y）的数据，请问怎么写循环语句啊？这么多变量我已经完全晕掉了，求赐教~
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
加油加油~
1楼2012-12-20 22:47:53
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csgt0

荣誉版主 (著名写手)

彩色挂图

【答案】应助回帖

因为它每次都大于0.4啊
赞一下 回复此楼
showmethemoney
6楼2012-12-21 16:32:44
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

csgt0

荣誉版主 (著名写手)

彩色挂图

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与，应助指数 +1
gaojinggigi: 金币+5, ★★★很有帮助 2012-12-21 19:03:33
CODE:
a=0.8;
n=1.45;
f=100;
i=1;
x(1)=a;
y(1)=0;

while x(end)<20&&y(end)<0.5
     gamma1=atan((x(end)+a)/(y(end)+f));
     alpha1=gamma1/(n-1);
     beta1=alpha1*n;
     l1=2*a*sin(alpha1)/cos(beta1);     
     i=i+1;
     x(i)=x(end)+(2*a+l1*cos(gamma1));
     y(i)=y(end)+(l1*sin(gamma1));
end
赞一下(1人) 回复此楼
showmethemoney
2楼2012-12-21 09:25:31
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

gaojinggigi

新虫 (正式写手)
引用回帖:
2楼: Originally posted by csgt0 at 2012-12-21 09:25:31
a=0.8;
n=1.45;
f=100;
i=1;
x(1)=a;
y(1)=0;

while x(end)<20&&y(end)<0.5
     gamma1=atan((x(end)+a)/(y(end)+f));
     alpha1=gamma1/(n-1);
     beta1=alpha1*n;
      ...

大侠，我后来发现每计算一次出来y>0.4,需要改变x(i)和y(i)和a的初值，x(i)和a的初值是下面程序的值，y(i)=0,再进行之前的循环，再求出y>0.4，改变x(i)和y(i)和a，一直计算到x>20结束。可是我加上if条件之后不知道怎么让它返回继续循环，还有x>20停止循环的命令怎么加？
我不会加循环，每次计算完了找到y>0.4的值再用公式求出a和x再代入，发现做了十几步还没做完~愁死我了~

a0=0.8;
a=-0.8;
n=1.411;
f=100;
x(1)=a;y(1)=0;

for ii=2:1:100
    gamma(ii)=atan((x(ii-1)-a)/(y(ii-1)+f));
    alpha(ii)=atan(sin(gamma(ii)/(n-cos(gamma(ii)))));
    beta(ii)=asin(sin(alpha(ii))*n);
    l(ii)=(a0-a)*sin(alpha(ii))/cos(beta(ii));

    x(ii)=x(ii-1)+(a0-a+l(ii)*sin(gamma(ii)))
    y(ii)=y(ii-1)+(l(ii)*cos(gamma(ii)))
  if y(ii)>0.4
    x(ii)=(0.4-y(ii-1))/tan(alpha(ii));
    a=x(ii)-(f+0.4)*tan(gamma(ii));
    y(ii)=0;
    ii=ii+1;
   end
  
end
赞一下 回复此楼
加油加油~
3楼2012-12-21 15:59:13
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

csgt0

荣誉版主 (著名写手)

彩色挂图

【答案】应助回帖

去掉ii=ii+1;
在最后的end前加入
if x(ii)>20
break;
end
赞一下 回复此楼
showmethemoney
4楼2012-12-21 16:13:44
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭