RE: Re: Log plots: plot points *linearly* equidistant
- To: mathgroup at smc.vnet.net
- Subject: [mg31690] RE: [mg31677] Re: Log plots: plot points *linearly* equidistant
- From: "David Park" <djmp at earthlink.net>
- Date: Sat, 24 Nov 2001 16:44:05 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hi Tom,
That's nice! It can be easily extended to also insert a plot style. The
Mathematica documentation for GridLines says that they will be drawn as
LighBlue. But they never look LightBlue to me. If one wants to change the
grid line style the following construction can be used (with the same
initial thread example):
Needs["Graphics`Graphics`"]
Needs["Graphics`Colors`"]
logstep[f_][y_] := f[10^(y)]
f[x_] := UnitStep[x - 1]
Plot[logstep[f][y], {y, -2, 3},
Frame -> True,
FrameTicks -> {LogScale, Automatic, None, Automatic},
GridLines -> {{First[#], {LightBlue}} & /@
LogScale[##] &, {First[#], {LightBlue}} & /@ LinearScale[##] &},
Axes -> None];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> From: Tom Burton [mailto:tburton at cts.com]
To: mathgroup at smc.vnet.net
>
> The following function will be handy if you want gridlines:
>
> GridLogScale:=First/@LogScale[##]&
>
>