Re: Stretching X-Axis in Plot[]

*To*: mathgroup at smc.vnet.net*Subject*: [mg45804] Re: Stretching X-Axis in Plot[]*From*: bobhanlon at aol.com (Bob Hanlon)*Date*: Mon, 26 Jan 2004 01:53:09 -0500 (EST)*References*: <bv00rj$jg7$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

When you make the AspectRatio small, make the ImageSize large. Or you can use an inset of the magnified region: f[x_] := (x-0.5)(x-.65)(x-.675)(x-.7)(x-.725)(x-.75)(x-1); Plot[f[x],{x,.5,1}, Epilog->{Rectangle[{.5, -2*^-5}, {.8, -3*^-6}, Plot[10^9*f[x],{x,.63,.77}, AxesLabel->{None,"*10^-9"}, DisplayFunction->Identity]]}, ImageSize->450]; Bob Hanlon In article <bv00rj$jg7$1 at smc.vnet.net>, Harold.Noffke at wpafb.af.mil (Harold Noffke) wrote: << I have a function I want to Plot between 0.5 and 1.0 with a "stretched out" x-axis. I want to put a "horizontal magnifying glass" on the function between 0.65 and 0.75, because it wiggles a lot in this part of its domain. I tried to find a Plot option which allows the x-axis to stretch horizontally across the screen. I experimented with AspectRatio -> 10, and found I could do y-axis (Range) stretch with no problem. But when I tried AspectRatio -> 0.1, the y-axis collapsed, and the x-axis did not stretch at all. I'm stumped. I can't find an x-axis stretching option that produces more on-screen horizontal plot details. Does anyone know a way to stretch the x-axis in Mathematica Plots?