MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Plot3D gives serrated ridge

  • To: mathgroup at smc.vnet.net
  • Subject: [mg54778] Plot3D gives serrated ridge
  • From: "Hugh Goyder" <h.g.d.goyder at cranfield.ac.uk>
  • Date: Tue, 1 Mar 2005 01:58:40 -0500 (EST)
  • Organization: University of Warwick, UK
  • Sender: owner-wri-mathgroup at wolfram.com

The function f, below, has two sharp ridges. The interaction between the
mesh positions and the ridges gives the impression of a very jagged rather
than a smooth ridge. Consequently the plot is difficult to interpret.
Unfortunately the plot has to be in black and white for publication.

Any suggestions for improving the plot?
Is it possible to plot contours and lines of steepest decent in three
dimensions?



f = -((2*I)/(4 - 100*((9.42477796076938 + 0.01*I) -
2*k)*(0.047123889803846894*I - k + k1)));

Plot3D[Evaluate[Abs[f]], {k1, 4, 5.5}, {k, 4.5, 5}, PlotPoints -> {50, 50},
ColorFunction -> (RGBColor[1, 1, 1] & )];



Thanks

Hugh Goyder




  • Prev by Date: MathLink
  • Next by Date: Re: Simplify and Abs
  • Previous by thread: Re: MathLink
  • Next by thread: Re: Plot3D gives serrated ridge