Graphics[{{Orange, Disk[{0, 0}, .1]}, {Black, Disk[{2, 0}, .1]}}] will display two disks.
Is there a way to print "Orange" and "Black" next to the disks in a program? The disk color will come from code. Therefore, I cannot use a textbox to add the word.
Thank you very much.
Something like the following?
tColor1 = Orange; tColor2 = Blue; Graphics[{ {Orange, Disk[{0, 0}, .1]}, Text[Style["Orange", tColor1], {0.25, 0}], {Black, Disk[{2, 0}, .1]}, Text[Style["Black", tColor2], {2.25, 0}] }]
This produces
Thank you
