微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

如何在 Mathematica 中找到两个 3D 曲面的交点?

如何解决如何在 Mathematica 中找到两个 3D 曲面的交点?

我有两个由两个变量组成的方程,我通过定义两个变量的范围在 3D 中绘制这两个函数。我需要找到这两个函数的交点。我尝试使用 Graphics'Mesh'FindIntersections 但它不适用于 3D 绘图。谁能帮我这个?我需要获取交点的数据。

代码如下:

e1= -0.0492101+(0.00982664*l3*Sec[147.557*l3]^2*(Tan[147.557*l8]+3.34665*Tan[152.139*l8]))/(Tan[152.139*l3]*Tan[147.557*l8]-Tan[147.557*l3]*Tan[152.139*l8])+(0.00982664*l8*Sec[147.557*l8]^2*(Cot[147.557*l8]*Tan[147.557*l3]+3.34665*Cot[147.557*l8]*Tan[152.139*l3]))/(-Tan[152.139*l3]+Cot[147.557*l8]*Tan[147.557*l3]*Tan[152.139*l8])==0;
e2= 0.00629091 +(0.113333*l3*Sec[152.139*l3]^2*(Tan[147.557*l8]+3.34665*Tan[152.139*l8]))/(Tan[152.139*l3]*Tan[147.557*l8]-Tan[147.557*l3]*Tan[152.139*l8])+(0.113333*l8*Sec[152.139*l8]^2*(Cot[147.557*l8]*Tan[147.557*l3]+3.34665*Cot[147.557*l8]*Tan[152.139*l3]))/(-Tan[152.139 l3]+Cot[147.557*l8]*Tan[147.557*l3]*Tan[152.139*l8])==0 
plot=Plot3D[{e1,e2},{l3,0.008,0.012},{l8,0.012}] 

我有一个像这样的 3D 绘图3d plot。非常感谢任何帮助。

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。