|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
题目:用循环迭代求取c点的轨迹,和移动的g点轨迹
假设xA为已知,先取xC1=xA;
k=[sqrt(R0^2+(e^2-1)*xC1^2)]/xC1;此为c点的法线斜率,
xC2=xA-r/sqrt(1+k^2);
zC2=[R0-sqrt(R0^2+(e^2-1)xC2^2)] /(e^2-1);
zA=zC2+k(Xa- xC2);
xG=xA+q;
zG= zA+L;
已知
R0=8000;e^2=1.1;r=2.5;q=125;l=300;i=1;
下面是我编的程序,可是对循环迭代不是很清楚,所以无法得出想要的结果,希望各位帮我看看有什么问题,谢谢!!
clc;clear;
F1=kongkong(i,6);
R0=8000;
e2=1.1;
r=2.5;
q=125;
l=300;
i=1;
xA=1;
xC(i)=xA;
while(abs(b)>=10^(-8)) % while(abs(b)>=1e-8)
i=i+1;% 放在后面
k(i)=sqrt(R0^2+(e2-1)*xC(i)^2)./xC(i);
xC(i+1)=xA-r/sqrt(1+k(i)^2);
zC(i+1)=(R0-sqrt(R0^2+(e2-1)*xC(i+1)^2))/(e2-1);
zA(i)=zC(i+1)+k(i)*(xA-xC(i+1));
xG(i)=xA+q;
zG(i)=zA(i)+l;
b=(xC(i)-xC(i-1));
end
F1(i,1)=xA;%这几个都没有循环
F1(i,2)=zA;%F1有什么用
F1(i,3)=xC;
F1(i,4)=zC;
F1(i,5)=xG;
F1(i,6)=zG;
plot(xC,zC)
plot(xA,zA)
plot(xG,zG)
hold on
end %这个对应哪个??
format short g,F1;
[ 本帖最后由 eight 于 2007-12-27 17:35 编辑 ] |
|