{Cos[s], Sin[t], Sin[2t + 2s]},
{s, 0, 2Pi}, {t, 0, 2Pi},
PlotPoints -> {100, 100},
Boxed -> False,
Axes -> None]
{Cos[u]*Cos[v],
Sin[u]*Sin[v],
1/2Sin[4u]},
{u, 0, 2π}, {v, 0, 2π},
Boxed -> False,
Axes -> False,
ViewPoint -> {1.821, -1.737, 2.262},
PlotPoints -> 60]
(*It takes much time.*)
{Sin[u + v] , 2*Sin[v]Cos[v] , Cos[u]},
{u, -Pi, Pi}, {v, -Pi, Pi},
PlotPoints -> {50, 50},
Boxed -> False,
Axes -> None]
卜部東介研究室に戻る
まで！