Maximaでメビウスの帯を描画

投稿者: | 2021年8月8日

Maximaでメビウスの帯を描画

Maximaでのソースコード


plot3d(
	[
		cos(s)*(3+t*cos(s/2))
		,sin(s)*(3+t*cos(s/2))
		,t*sin(s/2)
	]
	,[s,0-%pi,%pi]
	,[t,-1,1]
	,[grid, 50, 10]
	,[mesh_lines_color,true]
	,[box, false]
	,[legend, false]
);

下記設定にて、軸座標表示を非表示にします。

[box, false]

出力画像


出力画像の展開動画


関連記事