|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
这个程序是关于两条曲线求交点的,我能画出图来,但不知道交点的横坐标如何输出,请好心人指点一下,谢谢
A=0.33*4/3*pi*(0.7e-3)^3/5e-9
h=1/20
r=0.7e-3
e=0.5
p=586.8
a=0.0001:0.01:1000;
y1=cot(a);
y2=(h*e*A*3)./(pi*4*r^3*a*p);
plot(a,y1,'r.'),axis([0 1000 -1000 1000])
axis normal, grid on,
hold on
plot(a,y2,'b.'),axis([0 1000 -1000 1000])
axis normal, grid on,
hold off
pause
j=1;
for i=1:0.00001:5
if abs(cot(i)-(h*e*A*3)/(pi*4*r^3*a*p))<1e-4
k(j)=i
j=j+1;
end
end
i=k
f=cot(i)-((h*e*A*3)./(pi*4*r^3*(i)*p))
[ 本帖最后由 ahqiu198357 于 2006-8-28 21:04 编辑 ] |
|