卜部東介研究室 |1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|終わりに　

<< Graphics`ParametricPlot3D`; SphericalPlot3D[ u^2 - Exp[t], {t, 0, Pi}, {u, 0, 4 Pi}, ViewPoint -> {0, -5, 2}, PlotPoints -> {50, 50}, Boxed -> False, Axes -> None]	<< Graphics`ParametricPlot3D`; SphericalPlot3D[ 1 + Sin[7a] Sin[3b] + a/5, {a, 0, Pi}, {b, 0, 2Pi}, ViewPoint -> {3, 1, 2}, PlotPoints -> {50, 50}, Boxed -> False, Axes -> None]	<< Graphics`ParametricPlot3D`; SphericalPlot3D[ 2 + Sin[7s] Sin[3t], {s, 0, Pi}, {t, 0, 2Pi}, ViewPoint -> {2, 1, 0.3}, PlotPoints -> {50, 50}, Boxed -> False, Axes -> None]

卜部東介研究室に戻る

ご意見、ご感想をぜひ まで！