Q: Axes on top of graphics primitives?
- To: mathgroup at smc.vnet.net
- Subject: [mg22908] Q: Axes on top of graphics primitives?
- From: Eckhard Hennig <hennig at itwm.uni-kl.de>
- Date: Thu, 6 Apr 2000 02:04:27 -0400 (EDT)
- Organization: ITWM
- Sender: owner-wri-mathgroup at wolfram.com
In a list plot, I would like to mark a rectangular region around the axes
origin with a gray background. The following three lines basically do what I
want except that the axes are drawn *behind* the rectangle. Does anyone know
an approach that allows to draw the axes on top of the gray region?
lp = ListPlot[{{0, 0}}, PlotRange -> {{-2, 2}, {-2, 2}}, AspectRatio -> 1]
region = Graphics[{GrayLevel[0.95], Rectangle[{-1, -1}, {1, 1}]}]
Show[lp, region]
-- Eckhard
-----------------------------------------------------------
Dipl.-Ing. Eckhard Hennig mailto:hennig at itwm.uni-kl.de
Institut fuer Techno- und Wirtschaftsmathematik e.V. (ITWM)
Erwin-Schroedinger-Strasse, 67663 Kaiserslautern, Germany
Voice: +49-(0)631-205-3126 Fax: +49-(0)631-205-4139
http://www.itwm.uni-kl.de/as/employees/hennig.html
ITWM - Makers of Analog Insydes for Mathematica
http://www.itwm.uni-kl.de/as/products/ai
-----------------------------------------------------------