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