ちょっと面白い絵
Mathematicaで絵を描いてみた。
Rでも試してみたい。
ParametricPlot[{Sin[30t], Sin[31t]}, {t, 0, 2Pi}, PlotStyle -> Hue[0.3], AspectRatio -> Automatic, PlotPoints -> 20000]
Mathematicaで絵を描いてみた。
Rでも試してみたい。
ParametricPlot[{Sin[30t], Sin[31t]}, {t, 0, 2Pi}, PlotStyle -> Hue[0.3], AspectRatio -> Automatic, PlotPoints -> 20000]