
Re: Question about PlotRange
Posted:
Jan 16, 2013 11:14 PM


The "clipped" items don't show but the boundaries show. To include the clipped portions, Join the plot, do clipping manually, or use ListLinePlot
Table[ ListPlot[ Table[x, {x, .13, .13, .01}], Axes > True, Filling > 0, FillingStyle > {Red, Darker[Green]}, PlotRange > {Automatic, yRange}], {yRange, {Full, {0.1, 0.06}}}]
Table[ ListPlot[ Table[x, {x, .13, .13, .01}], Axes > True, Filling > 0, FillingStyle > {Red, Lighter[Green]}, Joined > True, PlotRange > {Automatic, yRange}], {yRange, {Full, {0.1, 0.06}}}]
Table[ ListPlot[ Table[Clip[x, {0.1, 0.05}], {x, .13, .13, .01}], Axes > True, Filling > 0, FillingStyle > {Red, Darker[Green]}, PlotRange > {Automatic, yRange}], {yRange, {Full, {0.1, 0.06}}}]
Table[ ListLinePlot[ Table[x, {x, .13, .13, .01}], Axes > True, Filling > 0, FillingStyle > {Red, Darker[Green]}, PlotRange > {Automatic, yRange}], {yRange, {Full, {0.1, 0.06}}}]
Bob Hanlon
On Wed, Jan 16, 2013 at 1:42 AM, James Stein <james@stein.org> wrote: > I am mystified by the two charts produced by this expression: > > Table [ > ListPlot [ Table [ x, { x, .13, .13, .01 } ] , > Axes > True, > Filling > 0, > FillingStyle > { Red, Darker [ Green ] } , > PlotRange > { Automatic, yRange } > ] , { yRange, { Full, { 0.1, 0.06} } } ] > > If 'PlotRange' allows 'Full' for the yaxis, all data is plotted as > expected, but > if 'PlotRange' restricts extreme values of y, *some* extreme values > have vanished, > but *not* the *most* extreme values. > > My desire is for all 27 values to appear on the second chart. > (In more realistic situations, the visual 'Filling' is important.) > How is this to be achieved? >

