在《管状曲面的绘制过程》里面提到的方法，只对光滑曲线适用。而正方形恰好不是光滑曲线，它有四个直角顶点。那么，我们怎么来绘制管状正方形呢？
工具/原料
电脑
mathematica
方法/步骤
1、先来画一个正方形：连结四条线段。Graphics3D[Line[{{1,0,0},{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}}]]
2、把线段变成管。Graphics3D[Tube[{{1,0,0},{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}}]]
3、或者，还可以写为：Graphics3D[Line[{{1,0,0},{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}}]]/.Line[pts_]->Tube[pts]
4、限定管子的粗细程度：Graphics3D[Line[{{1,0巳呀屋饔,0},{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}}]]/.Lin髫潋啜缅e[pts_]->Tube[pts,0.1]
5、还可以这样：Graphics3D[Tube[{{1,0,0},{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}},0.3]]
6、改变拐角处的接口样式：Graphics3D[{JoinForm["Mite筠续师诈r"],Tube[{{1,0,0}荑樊综鲶,{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}},0.1]}]
7、改变颜色，实现渐变色：Graphics3D[{JoinForm["Mite筠续师诈r"],Tube[{{1,0,0}荑樊综鲶,{0,1,0},{-1,0,0},{0,-1,0},{1,0,0}},0.1,VertexColors->{Red,Green,Pink,Blue,Red}]}]
