Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2000
*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 2000

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

Search the Archive

Re: PLEASE HELP!! Need to change symbols in LinearLogListPlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg23816] Re: PLEASE HELP!! Need to change symbols in LinearLogListPlot
  • From: Hartmut Wolf <hwolf at debis.com>
  • Date: Sat, 10 Jun 2000 03:00:25 -0400 (EDT)
  • Organization: debis Systemhaus
  • References: <393C5787.A5363CB5@r.imap.itd.umich.edu>
  • Sender: owner-wri-mathgroup at wolfram.com

Rodney Agayan schrieb:
> 
> Having enormous trouble figuring out how to change the symbol in
> LinearLogListPlot, or any type of ListPlot for that matter.
> 
> Changing symbols is relatively easy in MultipleListPlot, however doing
> such in LinearLogListPlot has confounded me.  Can anyone help?
> 
> On the other hand, if anyone knows how to modify MultipleListPlot so
> that it plots lists on Linear-Log scales, that would be greatly
> appreciated!!!
> 

Dear Rodney,

of course we can scavange on MultipleListPlot, e.g. like that:

<< Graphics`MultipleListPlot`
<< Graphics`Graphics`

Now be ...

t = Table[Exp[n^2], {n, 0, 10}]; 

... our data, and let's have ...

lp = LinearLogListPlot[t, PlotJoined -> True] 

lpt = LinearLogListPlot[t, PlotJoined -> False]

... as we like. The trick is to get at a private function of MultipleListPlot.
So we define

ss[sym_, size:(_Integer | _Real):5., style: _?(!NumberQ[#] &):{}, t___?OptionQ]
:= 
  Graphics`MultipleListPlot`Private`doshape[style, PlotSymbol[sym, size, opt],
	None, #] &

... and now we can do different things:

Show[lp, Graphics[ss[Diamond] @ lp[[1, 1]] ]]

Show[lp, Graphics[ss[Box, 3.5] @ lp[[1, 1]]  ]]

Show[lp, Graphics[ss[Star, 7, Hue[0], Filled -> False] @ lp[[1, 1]] ]]

Show[lpt, 
  Graphics[ss[Triangle, Hue[2/3]] @ (lpt[[1]] /. Point -> Sequence)]]


Kind regards,  Hartmut Wolf



  • Prev by Date: Re: system of nonlinear ODE
  • Next by Date: Re: Re: programming DeleteRepetitions
  • Previous by thread: Updated enhancements on MathSource
  • Next by thread: Re: PLEASE HELP!! Need to change symbols in LinearLogListPlot