Re: How to remove an artifact from a plot
- To: mathgroup at smc.vnet.net
- Subject: [mg81954] Re: [mg81896] How to remove an artifact from a plot
- From: DrMajorBob <drmajorbob at bigfoot.com>
- Date: Sun, 7 Oct 2007 05:39:11 -0400 (EDT)
- References: <16425380.1191676087315.JavaMail.root@m35>
- Reply-to: drmajorbob at bigfoot.com
ListPlot is setting AxesOrigin to {0,0.2}: test = Table[{x, (1/ 2) + (Cos[2*2*Pi*x]/ 2)*(E^-(x^2) + (1/2)*0.1*E^-((x - 12)^2) + (1/2)*0.05* E^-((x - 27)^2) + (10^-3)*E^-((x - 280)^2))}, {x, -10, 40, 0.05}]; plot = ListPlot[test, PlotRange -> All, Joined -> True, Frame -> True, FrameLabel -> {"Pathlength Mismatch (2\[CenterDot]m mm)", " Signal Strength "}, BaseStyle -> {FontFamily -> "Garamond", FontSlant -> "Italic", FontSize -> 14}]; AbsoluteOptions[plot, AxesOrigin] {AxesOrigin -> {0., 0.2}} Axes->False fixes the problem: plot = ListPlot[test, PlotRange -> All, Joined -> True, Frame -> True, Axes -> False, FrameLabel -> {"Pathlength Mismatch (2\[CenterDot]m mm)", " Signal Strength "}, BaseStyle -> {FontFamily -> "Garamond", FontSlant -> "Italic", FontSize -> 14}] If you use Frame, you probably don't want Axes too. Bobby On Sat, 06 Oct 2007 03:36:15 -0500, <john.feth at honeywell.com> wrote: > I'm using Mathematica 6.0 and when I use the following notebook entry > > Test=Table[{x,(1/2)+(Cos[2*2*Pi*x]/2)*(E^-(x^2)+(1/2)*0.1*E^- > ((x-12)^2)+(1/2)*0.05*E^-((x-27)^2)+(10^-3)*E^-((x-280)^2))}, > {x,-10,40,0.05}];ListPlot[Test,PlotRange->All,Joined->True,Frame- >> True,FrameLabel->{"Pathlength Mismatch (2\[CenterDot]m mm)"," Signal > Strength "},BaseStyle->{FontFamily->"Garamond",FontSlant- >> "Italic",FontSize->14}] > > in addtion to the plot I want, I get a horizontal line across the > whole plot at 0.2. This sort of artifact also appears occasionally in > Mathematica 5.1. > > Does anyone know why it appears? > > Does anyone know how to get rid of it? > > Thanks very much, > > John Feth > > > -- DrMajorBob at bigfoot.com