Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2013

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

Search the Archive

Re: Plot with axes exchanged

  • To: mathgroup at smc.vnet.net
  • Subject: [mg130498] Re: Plot with axes exchanged
  • From: Roland Franzius <roland.franzius at uos.de>
  • Date: Tue, 16 Apr 2013 04:21:24 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net
  • References: <kkikc9$rnl$1@smc.vnet.net>

Am 16.04.2013 06:34, schrieb Dr. Wolfgang Hintze:
> How can I exchange axes in a plot, i.e. plot the function value along
> the horizontal axis and the independent variable against the vertical
> axis?
>
> Any help is apreciated.

Plot[InverseFunction[(#^2&)][x],{x,0,1}]

may give you the wrong branch.

To get the desired branch use a parametrization

ParametricPlot[{x^2],x},{x,0,1}]

or mirror the graphics data at the identity function graph

pl = Plot[x^2, {x, -1, 2}];

pl1 = Graphics[pl[[1]] /. {x_Line :> Map[Reverse, x, {2}]},
   Axes -> True]

-- 

Roland Franzius



  • Prev by Date: Re: Plot with axes exchanged
  • Next by Date: Re: How to apply tags to expression terms?
  • Previous by thread: Re: Plot with axes exchanged
  • Next by thread: Re: Plot with axes exchanged