Color each half of a disc differently

Question

Given a simple graphics object like a disc in black:

Graphics[Disk[]]

Is it possible to split the disc in the middle, i.e. color each half differently e.g. left half in black and right half in red?

See the three-argument form of Disk in the documentation. Alternatively, construct it from Polygons (see CirclePoints). — Szabolcs, Commented Apr 11, 2017 at 11:30

Pinti · Accepted Answer · 2017-04-11 12:34:09Z

7

Graphics[{
  Black, DiskSegment[{0, 0}, 1, {Pi/2, 3 Pi/2}],
  Red, DiskSegment[{0, 0}, 1, {3 Pi/2, 5 Pi/2}]
  }]

EDIT: DiskSegment was introduced in MMA 10.2. Alternative code that works in previous versions is simply...

Graphics[{
  Black, Disk[{0, 0}, 1, {Pi/2, 3 Pi/2}],
  Red, Disk[{0, 0}, 1, {3 Pi/2, 5 Pi/2}]
  }]

answered Apr 11, 2017 at 12:10

Pinti

6,5231 gold badge18 silver badges48 bronze badges

$\begingroup$ Thank you! But it seems, that the DiskSegment function doesn't exist in mathematica 10.1? Which version are u using? $\endgroup$
– holistic
Commented Apr 11, 2017 at 12:25
$\begingroup$ @holistic Please see my edited answer. I have just learned about this use of Disk. $\endgroup$
– Pinti
Commented Apr 11, 2017 at 12:36
$\begingroup$ Great, thank you!! $\endgroup$
– holistic
Commented Apr 11, 2017 at 12:40

Add a comment |

1 Answer 1