Re: two y-axis
- To: mathgroup at smc.vnet.net
- Subject: [mg27274] Re: two y-axis
- From: Erich Mueller <emuelle1 at uiuc.edu>
- Date: Sat, 17 Feb 2001 03:30:46 -0500 (EST)
- Organization: University of Illinois at Urbana-Champaign
- References: <96irmc$de0@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
You might be able to do something with Ticks or FrameTicks. Here is a
rather crude example
Plot[{Sin[x], Cos[x]}, {x, 0, 2 Pi}, Frame -> True,
PlotStyle -> {Hue[0.2], Hue[0.8]},
FrameTicks -> {Automatic,
Table[{x, StyleForm[ToString[4x - 1], FontColor -> Hue[0.2]],
0.01, {Hue[0.2]}}, {x, -1, 1, 0.25}], None,
Table[{x, StyleForm[ToString[(x + 1)/2], FontColor -> Hue[0.8]],
0.01, {Hue[0.8]}}, {x, -1, 1, 0.4}]}]
Erich
On 16 Feb 2001, Bernd Brandt wrote:
> Dear group,
>
> Does anyone have code or know how to plot two functions in Mathematica, each on
> a different y-axis. I haven't found whether it is possible to use to
> y-axes in Plot.
>
>
>
> Regards,
> Bernd
>
>