弘前大学 理工学部 数物科学科 数理科学コース

| アクセス |

トップページグラフィックギャラリー > 曲線の部屋3

グラフィックギャラリー

曲線の部屋3

にんじん

ParametricPlot[{(Cos[t] + Sin[2t]) (2 + Sin[5t]), (Sin[t] + Cos[2t]) (2 + Cos[4t])}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_3.gif]

-Graphics -

壺

ParametricPlot[{2Cos[t] Sin[2t] + Sin[t], 3Cos[t]/(2 + Cos[t])}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_7.gif]

-Graphics -

風車

ParametricPlot[{Sin[t]^5 + Cos[3t]^3, Cos[t]^5 + Sin[3t]^3}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_11.gif]

-Graphics -

クリオネ

ParametricPlot[{Sin[2t]^5 + Cos[3t]^3, Cos[2t]^5 + Sin[3t]^3}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_15.gif]

-Graphics -

エビ

ParametricPlot[{Cos[t] + Cos[2t^2] + Sin[t], Sin[t] + Sin[2t^2] Cos[t^2]}, {t, 0, 3Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_19.gif]

-Graphics -

星

ParametricPlot[{(1/2) Sin[5t] Cos[t] + 2Cos[t], (1/2) Sin[5t] Sin[t] + 2Sin[t]}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_23.gif]

-Graphics -

花

ParametricPlot[{(0.3 + 0.5Cos[5t] - 0.15Cos[15t]) Cos[2t], (0.3 + 0.5Cos[5t] - 0.15Cos[15t]) Sin[2t]}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_27.gif]

-Graphics -

凧

ParametricPlot[{2 + Sin[2t]/(2 + Cos[10t]), 2 + Cos[2t]/(2 + Sin[10t])}, {t, 0, Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_31.gif]

-Graphics -

スパイダ - マン

ParametricPlot[{2Cos[t] Sin[t], Sin[5t/2] Cos[2t] + Sin[t]^2}, {t, 0, 8Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_35.gif]

-Graphics -

サツマイモ

ParametricPlot[{Sin[t] Cos[49t], Cos[51t] Sin[t]}, {t, 0, Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_39.gif]

-Graphics -

手裏剣

ParametricPlot[{Sin[76t] Cos[t], Cos[t] Sin[77t]}, {t, 0, Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_43.gif]

-Graphics -

星型

ParametricPlot[{Cos[t]/(3 + Sin[5t]), -Sin[t]/(3 + Sin[5t])}, {t, 0, 2Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_47.gif]

-Graphics -

カンザシ

ParametricPlot[{Sin[3t] + Cos[t], Cos[3t] Cos[t/2] + Cos[t/2] Sin[t]}, {t, 0, 4Pi}, AspectRatio→Automatic]

[Graphics:HTMLFiles/gallery6_51.gif]

-Graphics -

小人

ParametricPlot[{Sin[6t]^3 + 3, Cos[4t]^3 (2 + Sin[t]) + 3}, {t, 0, 2Pi}, AspectRatio→Automatic, PlotRange->All]

[Graphics:HTMLFiles/gallery6_55.gif]

-Graphics -


Created by Mathematica  (December 9, 2008) Valid XHTML 1.1!
このページのトップへ戻る