Message Boards Message Boards

0
|
5810 Views
|
3 Replies
|
0 Total Likes
View groups...
Share
Share this post:

How to print small disks next to each other?

Posted 9 years ago
Clear["Global`*"]
Graphics[{Orange, Disk[{0, 0}, .01]}]
Graphics[{Black, Disk[{2, 0}, .01]}]

This code prints two disks with radius 1. Why does it not print smaller disks with 0.01 radius?

Thanks.

POSTED BY: steve ma
3 Replies

Hi,

I don't think that Mathematica prints the disks with radius one. You are creating two different graphics objects, the axes of which are scaled to render the disks at their "optimal" size. If you plot them into one figure you see that they indeed have radius 0.01:

Clear["Global`*"]; 
Graphics[{{Orange, Disk[{0, 0}, .01]}, {Black, Disk[{2, 0}, .01]}}]

produces this image: ********************************

enter image description here


Cheers,

M.

POSTED BY: Marco Thiel
Posted 9 years ago

Thanks a lot. Is there a way to print "Orange" and "Black" next to the disks?

POSTED BY: steve ma
Posted 9 years ago

If I need to display only one small dot in a line, what should I do? Thanks.

POSTED BY: steve ma
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract