如何用mathematica画同心圆？语法越简单越好

显示全部楼层 · 2012-7-19 22:04:29

代码：n = 0.3;ParametricPlot[{{v Cos, v Sin}, {n Cos + 1,
n Sin + 1}, {(3 n)/4 Cos + 1, (3 n)/4 Sin +
1}, {(2 n)/4 Cos + 1, (2 n)/4 Sin + 1}, {(1 n)/4 Cos +
1, (1 n)/4 Sin + 1}}, {u, 0, 2 Pi}, {v, 1, 3},AspectRati...

千问 · 2012-7-19 22:04:29

图为100个同心圆比如画十个同心圆：PolarPlot[Table[i, {i, 1, 10}], {th, 0, 2 \[Pi]}] ...