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 > >