
教程上,使用的Graphics[Disk[]]这种语句来输出的,disk是填充圆。太极图可以认为是一个Circle,2个小填充圆作为阴阳鱼的鱼眼,2个半径与Circle相等的Disk作为上下,2个半径在Circle和鱼眼中间的Disk作为鱼头来实现的:
Graphics[{Circle[{0, 0}, 2],
Red, Disk[{0, 0}, 2, {0, \[Pi]}], Black,
Disk[{0, 0}, 2, {\[Pi], 2 \[Pi]}],
Red, Disk[{1, 0}, 1, {0, 2 \[Pi]}], Black,
Disk[{-1, 0}, 1, {0, 2 \[Pi]}],
Black, Disk[{1, 0}, .25, {0, 2 \[Pi]}], Red,
Disk[{-1, 0}, .25, {0, 2 \[Pi]}]
}
] Mathematica中如何给闭合曲线内部填充颜色? - 绘图 - 知乎 https://www.zhihu.com/question/36630804
可以在笔记本里面键入如下命令,然后执行即可,
SetOptions[$FrontEnd, Background -> RGBColor[199, 237, 204]]里面的 RGB 数值根据你自己的爱好可任意更改,想要恢复默认的话就改为
SetOptions[$FrontEnd, Background -> None]欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)