Re: More accuracy in Disk
- To: mathgroup at smc.vnet.net
- Subject: [mg33915] Re: More accuracy in Disk
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Tue, 23 Apr 2002 07:13:26 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <a9muil$a96$1@smc.vnet.net>
- Reply-to: kuska at informatik.uni-leipzig.de
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
your screen has a small resolution. A usual computer screen
has 72 -- 96 dot/inc. The human eye has a resolution of
approx 2400 dpi. Print your images on a PostScript printer
and all looks fine because the most PostScrip printers
have 1200 dpi.
Regards
Jens
Lorenzo Pesce wrote:
>
> Hi to all,
> I am trying to plot a series of disks but I do not manage to make
> mathematica plot my disks with higher accuracy (some of the small ones
> look really bad).
> How can I alter the number of points in a graphic of this sort to have
> more precise disks?
>
> TableDisk =
> Table[Disk[{Random[Real, {-200, 200}], Random[Real, {-200, 200}]},
> RandomNormal[10, 1]], {n, 40}];
>
> Show[
> Graphics[ TableDisk],
> Frame -> True,
> AspectRatio -> 1,
> PlotRange -> {{-200, +200}, {-200, +200}},
> PlotRegion -> {{0, 1}, {0, 1}},
> ImageSize -> {500, 500}
> ]
>
> Thanks a lot,
>
> Lorenzo