MathGroup Archive 2005

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

Search the Archive

Re: feature request: invert plot axes

  • To: mathgroup at smc.vnet.net
  • Subject: [mg62122] Re: feature request: invert plot axes
  • From: Marcus Stollsteimer <marcus314 at yahoo.com>
  • Date: Sat, 12 Nov 2005 03:31:20 -0500 (EST)
  • Organization: Comp.Center (RUS), U of Stuttgart, FRG
  • References: <dkuv07$7hr$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Jaccard Florian wrote:

> des = Plot[Log[Abs[x + 3]], {x, -8, 8}];
> 
> Show[des /. {a_, b_} -> {-a, b},
>   Ticks -> {(Ticks /. FullOptions[des])[[1]] /.
>      {a_, b_, c_, d_} -> {a, If[b != "", -b, ""]},
>     (Ticks /. FullOptions[des])[[2]]}]

Thanks, that's pretty good.

but for e.g.

  des = Plot[Sin[x], {x, 0, Pi/2}]

the x-axis is not drawn :(


Regards,
Marcus

-- 
Exactly what do we mean when we say, man is mortal?
Obviously it's not a compliment. -- W. Allen


  • Prev by Date: Accessing unevaluated input line
  • Next by Date: Re: Integrate problem?
  • Previous by thread: Re: feature request: invert plot axes
  • Next by thread: Re: feature request: invert plot axes