Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: User-defined or filled symbols for Points in ListPlots and Epilogs?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg49348] Re: User-defined or filled symbols for Points in ListPlots and Epilogs?
  • From: BobHanlon at aol.com
  • Date: Fri, 16 Jul 2004 06:06:31 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Needs["Graphics`Colors`"];


pointData=Table[{x,BesselJ[5, x]},{x,0,20}];


ListPlot[pointData, 
     PlotJoined->True,PlotStyle->Blue, 
     Epilog->{Red,
         Circle[#, Scaled[.01{1,GoldenRatio}]]&/@pointData}, 
     ImageSize->400, PlotRange->All];


You can also define your own symbols using MultipleListPlot.


Bob Hanlon

> In a message dated Wed, 14 Jul 2004 11:40:20 +0000 (UTC), <
> siegman at stanford.edu> writes: Are there any simple or easy ways to substitute a 
> user-defined symbol, 
> especially a "filled" symbol, for the Points in a ListPlot or Epilog?
> 
> The data I want to plot is already created in lengthy lists of the form
> 
>       pointData   =   { {x1,y1}, {x2,y2}, . . . . . }
> 
> which I can plot directly by using ListPlot or by putting 
> Map[Point, pointData]   into an Epilog.   I suppose I could create filled 
> circles to replace the Points in this Epilog, for example, by using 
> something like
> 
>       Epilog->{White, Map[Disk, convertedPointData], 
>                                         Map[Circle, convertedPointData]}
> 
> so that the filled opaque circles would overlay and hide the theoretical 
> data lines that pass underneath them.   Trying to convert my   pointData   
> lists into the necessary form so that I can do this has proven to be a 
> frustrating exercise, however.
> 
> So, is there a way to do this list conversion so that Disk and Circle 
> will Map onto the resulting list? -- or, a way to redefine the point 
> symbol in Point to be something more complex?   
> 
> (Having gotten used to the joys of Stroke and Fill in Illustrator, I'm 
> frustrated that Mathematica doesn't seem to offer -- or I haven't been 
> able to find -- similar graphical constructs.)
> 


  • Prev by Date: Re: ArcCos[x] with x > 1
  • Next by Date: Re: importing image and getting numbers from the gray intensity
  • Previous by thread: RE: User-defined or filled symbols for Points in ListPlots and Epilogs?
  • Next by thread: Fundamentals of the Mathematica Programmnbg Language note set by Richard J. Gaylord