MathGroup Archive 2002

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: How to do ListPlot with absolute point size?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg37942] Re: How to do ListPlot with absolute point size?
  • From: "Allan Hayes" <hay at haystack.demon.co.uk>
  • Date: Wed, 20 Nov 2002 09:09:20 -0500 (EST)
  • References: <arer6a$1bh$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Kirk,
Use PlotStyle:

    Module[{d = Table[{i, Random[Real, {0, 10}]}, {i, 2000}]},
        Scan[
            ListPlot[d, ImageSize -> {#1, #1},
            PlotStyle -> {AbsolutePointSize[2], Hue[0]}
            ] &,
            {1000, 500, 250, 125}
        ]
    ]

--
Allan

---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565


"Kirk Reinholtz" <kirk.reinholtz at jpl.nasa.gov> wrote in message
news:arer6a$1bh$1 at smc.vnet.net...
> I wish to display a given graphic via ListPlot at various scales, in a
> way such that the points and such stay the same absolute size.  The
> following shows (at least on my wintel nt4) that the axis labels and
> lines stay the same absolute size, but the points vary according to the
> ImageSize.  I'd like everything to stay the same size, just get more
> spread out.  For bonus points, I'd like to know how to make everything
> scale by ImageSize, as well.
>
> I'm aware of AbsolutePointSize[], but don't see how to get that into
> ListPlot.
>
> << Graphics`Graphics`
> Module[{d = Table[{i, Random[Real, {0, 10}]}, {i, 2000}]},
>   Scan[
>     ListPlot[d, ImageSize -> {#1, #1}] &,
>   {1000, 500, 250, 125}]]
>
> Thanks in advance!
>




  • Prev by Date: RE: How to do ListPlot with absolute point size?
  • Next by Date: Re: named optional parameters
  • Previous by thread: RE: How to do ListPlot with absolute point size?
  • Next by thread: How to avoid under/overflow?