卜部東介研究室 |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|終わりに 

Plot3D [
(Cos[Pi x] Cos[Pi y])^3,
{x, -2, 2},
{y, -2, 2},
PlotPoints -> 50,
Boxed -> False,
Axes -> None]
Plot3D[
Cos[Pi x] Cos[Pi y],
{x, -4, 2},
{y, -4, 2},
PlotPoints -> 50,
Boxed -> False,
Axes -> None]
Plot3D[
(50x^2 + y^2) Exp[1 - x^2 - y^2],
{x, -2.5, 2.5},
{y, -2, 2},
ViewPoint -> {1.015, -3.181, 0.548},
PlotPoints -> 50,
Boxed -> False,
Axes -> None]
Plot3D[
1/Sqrt[(1 - x)^2 + y^2] + 1/Sqrt[(1 + x)^2 + y^2],
{x, -2, 2},
{y, -2, 2},
PlotPoints -> 50,
Boxed -> False,
Axes -> None]

卜部東介研究室に戻る


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