怎么用Mathematica绘制圆柱

本文，我要介绍一下，用Mathematica画圆柱体的几种方法。

工具/原料

1
一个尺度的圆柱的隐函数方程是 x^2+y^2==1：
ContourPlot3D[x^2+y^2==1,{x,-2,2},{y,-2,2},{z,-2,2}]
2
这个圆柱的参数方程是 {Cos[t],Sin[t],z}：
ParametricPlot3D[{Cos[t],Sin[t],z},{t,0,2 Pi},{z,-2,2}]
3
RevolutionPlot3D [{1,t},{t,-2,2}]
这三幅图虽然是统一个圆柱，可是图像质量纷歧样。
4
也可以写为：
RevolutionPlot3D[{1,0,t},{t,-2,2}]
这现实上线段{1,0,t}绕z轴扭转而当作。
5
曲线{Cos[t],Sin[t],t}绕z轴扭转一周，也是一个圆柱。
6
曲线{Cos[6*t],Sin[6*t],t}绕z轴扭转，外貌的网格线已经不清晰了。
7
{Cos[2*t],Sin[t],t}绕z轴扭转，获得的，就不再是圆柱。
8
下图是{1,Sin[t],t}绕z轴扭转的图像。
9
{1,t*Sin[t],t}的扭转曲面。
END