Re: How smooth graphs?

• To: mathgroup at smc.vnet.net
• Subject: [mg61454] Re: [mg61385] How smooth graphs?
• From: Murray Eisenberg <murray at math.umass.edu>
• Date: Wed, 19 Oct 2005 02:17:05 -0400 (EDT)
• Organization: Mathematics & Statistics, Univ. of Mass./Amherst
• References: <200510170629.CAA16338@smc.vnet.net>
• Reply-to: murray at math.umass.edu
• Sender: owner-wri-mathgroup at wolfram.com

```Thanks to suggestions from several folks, my colleague did the following
to eliminate the apparent anti-aliasing of his plots:

"...I am using os x.  Did the plotting at 200, reset to 100, and then
exported to QuickTime and dragged onto Keynote.  It worked well.  The
graph is significantly less jagged when viewing the QuickTime movies
side by side on the screen.  Thanks  ... to the poster for this useful
idea.  Plan to use it again."

Murray Eisenberg wrote:
> A colleague, L.J. Moffitt, asked me how the graphs produced by the
> following code might be smoothed so as to avoid the jaggedness,
> especially the "staircasing".
>
> (This is going to be projected, and at a typical projection resolution
> of 1024 x 768, it looks even worse.)
>
> I tried all sorts of ploys, like drastically increasing PlotPoints and
> PlotDivision; lowering the Thickness in PlotStyle; and even breaking up
> the domain into two subintervals, one where the graph is more level and
> the other where the graph is rising rapidly.  Nothing seemed to help.
>
>   p[x_, L_] := (50.*L)/((1000. - 1.*x)*(-9.025*^8 + L + 1000.*x^2))
>
>   <<Graphics`Animation`
>
>   Animate[
>     Plot[p[x,L],{x, 0, 950},
>        PlotStyle->{AbsoluteThickness[3]},
>        PlotRange->{.1,.7},
>        AxesLabel->{"Inspection Rate","Robustness"},
>        PlotPoints->10000, PlotDivision->50,
>        AxesStyle->{RGBColor[0,0,1],Thickness[0.02]},
>        ImageSize->600,
>        Background->RGBColor[.1,.2,.7]],
>    {L,1000000000., 1000000000.+700000000., 10000000}]
>
> Any suggestions that I might pass along to him?
>

--
Murray Eisenberg                     murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower      phone 413 549-1020 (H)
University of Massachusetts                413 545-2859 (W)
710 North Pleasant Street            fax   413 545-1801
Amherst, MA 01003-9305

```

• Prev by Date: Re: Mathematica not simplifying Laplace transforms
• Next by Date: Re: Function, Command, Operator, Object...etc.
• Previous by thread: Re: How smooth graphs?
• Next by thread: Re: How smooth graphs?