圆柱面相贯线一例
发布时间
阅读量：
阅读量
选取两个较为简单的圆柱曲面
surfaces =ContourPlot3D[{y^2 + z^2 == 1, x^2 + z^2 == 4}, {x, -3, 3}, {y, -2,2}, {z, -3, 3}, ContourStyle -> Opacity[0.5], Mesh -> False]
intl = ParametricPlot3D[{{Sqrt[3 + t^2], t, Sqrt[1 - t^2]}, {Sqrt[3 + t^2], t, -Sqrt[1 - t^2]}, {-Sqrt[3 + t^2], t, Sqrt[1 - t^2]}, {-Sqrt[3 + t^2], t, -Sqrt[1 - t^2]}}, {t, -3, 3}, PlotPoints -> 100, PlotStyle -> Red] /. Line[pts_, rest___] :> Tube[pts, 0.05, rest]
确定它们的相交曲线：
还没有任何评论哟~