Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Axis in two scales

  • To: mathgroup at smc.vnet.net
  • Subject: [mg92591] Re: [mg92569] Axis in two scales
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Tue, 7 Oct 2008 07:05:25 -0400 (EDT)
  • Reply-to: hanlonr at cox.net

t = Table[{x, If[x < .5, Sin[100*x], Sin[x]]}, {x, 0, 5, 0.001}];

t1 = Select[t, First[#] < 0.5 &];
t2 = Complement[t, t1];

Grid[{{
   ListLinePlot[t1,
    ImageSize -> 250,
    Axes -> {True, False},
    Frame -> {True, True, True, False},
    PlotRange -> {{-0.01, 0.5}, {-1.05, 1.05}},
    PlotStyle -> Blue],
   ListLinePlot[t2,
    ImageSize -> 220,
    Axes -> {True, False},
    Frame -> {True, False, True, True},
    PlotRange -> {{0.5, 5.1}, {-1.05, 1.05}},
    PlotStyle -> Directive[Thick, Magenta]]}},
 Spacings -> -0.25]


Bob Hanlon

---- Nacho <ncc1701zzz at gmail.com> wrote: 

=============
Hello everyone.

I have a dataset in pairs (x,y) that I would like to plot. The main
problem is that the data set has interesting parts in the beginning
that I would like to view clearly.

As an example, create the following table:

t = Table[{x, If[x < .5, Sin[100*x], Sin[x]]}, {x, 0, 5, 0.001}];
ListPlot[t]

You have a very detailed sine in the beginnng and the rest is less
interesting.

I would like to "split" the X axis in two, so the left half of the
plot covers x={0,0.5} and the second half x={0.5,5}] in the same plot
and with the right ticks.

It is like a piecewise axis... is it possible?

Thanks.


--

Bob Hanlon



  • Prev by Date: Re: Axis in two scales
  • Next by Date: Re: Axis in two scales
  • Previous by thread: Re: Axis in two scales
  • Next by thread: Re: Axis in two scales