Maximaで巻貝モデルを描画

Maximaで巻貝モデルを描画

Maximaでのソースコード

plot3d (
    theta+phi, [theta, 0, %pi]
    , [phi, 0, 3*%pi]
    , same_xyz
    , [grid, 30, 150]
    ,[transform_xy, spherical_to_xyz]
    ,[mesh_lines_color,black]
    ,[palette,[gradient,"#505050", "#FFFFFF"]]
    ,[box, false]
    ,[legend, true])$

「 grid 」にて、メッシュの粒度を設定します。

  , [grid, 30, 150]

「 box 」にて、軸座標表示を非表示にします。

[box, false]

「gradient」 にて、グレーからのグラデーションを設定します。

 ,[palette,[gradient,"#505050", "#FFFFFF"]]

「 mesh_lines_color 」にて、メッシュ枠のラインカラーを設定します。

 ,[mesh_lines_color,black]

出力画像

関連記事



最近の投稿