RE: Graphics Bug (or anomaly anyway)
- To: mathgroup at smc.vnet.net
- Subject: [mg28320] RE: [mg28303] Graphics Bug (or anomaly anyway)
- From: "David Park" <djmp at earthlink.net>
- Date: Wed, 11 Apr 2001 02:00:59 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Use PlotRange. Do[ Print["nn = ", nn]; Show[ Graphics[{AbsolutePointSize[3], Table[Point[{n, m}], {n, 0, nn}, {m, 1, nn}]}], PlotRange -> {0.90, nn + 0.1}], {nn, 5, 8}] David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ > From: aes [mailto:siegman at stanford.edu] To: mathgroup at smc.vnet.net > > Try executing the following code, which creates a rectangular array of > points extending from n=0 to n=nn horizontally and m=1 to m=nn > vertically: > > Do[ > Print["nn = ", nn]; > Show[ > Graphics[ > Table[Point[{n, m}], {n, 0, nn}, {m, 1, nn}]]], {nn, 5,8}] > > Then click on the plots to show the bounding boxes. > > For nn<=6 the bounding box is closely wrapped around the array, with the > bottom line especially located just a little below the m=1 row. > > For nn>=7 the bottom of the bounding box suddenly drops down one unit > and is now located a little below where an m=0 row would be, if there > were one. > > If you make the array run only from n=1 and m=1 in both directions, the > bounding box wraps tightly all around for nn<=6, but drops back by one > unit on both left and bottom sides for nn>=7. > > Try giving a larger PointSize to the points. If the points are large > enough the circular points on the outer boundary of the array get cut > off by the bounding box on all 4 sides for nn<=6, but only on the top > and two sides, not on the bottom, for n>=7. > > Same thing happens with Circle or Disk -- except bounding box always > expands enough so the circles or disks are never cut off. > > Not a serious bug, maybe -- but does produce some minor hassles, e.g., > if you're exporting a series of figures at increasing values of nn to go > into another application, and counting on the bounding boxes to be all > the same size. > > [Mathematica 4.0, Mac PB G3, OS 8.6] >