Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1999
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1999

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

Search the Archive

Re: Showing a limited GrayLevel

  • To: mathgroup at smc.vnet.net
  • Subject: [mg19116] Re: [mg18977] Showing a limited GrayLevel
  • From: Russell Towle <rustybel at foothill.net>
  • Date: Thu, 5 Aug 1999 01:35:33 -0400
  • Sender: owner-wri-mathgroup at wolfram.com

> I have a quick question about changing the GrayLevel in contour plots.
>
> When using ContourPlot, how is it possible to limit the GrayLevel range?
>That is, instead of GrayLevel being scaled between 0 and 1, the contours
>would be shown between 0.5 and 1 cutting out any totally black parts of the
>plot.


Steve, try this:

a=.5 (*set lower limit of gray level*)
ContourPlot[Sin[x y],{x,-2,2},{y,-2,2},
    ColorFunction->(GrayLevel[(#+a)/(1+a)]&)];


and this:

(*use rgb colors*)
ContourPlot[Sin[x y],{x,-2,2},{y,-2,2},
    ColorFunction->(RGBColor[#,#,1-#]&)];

Russell Towle
Box 141
Dutch Flat, CA 95714
(530) 389-2872



  • Prev by Date: Re: Subscripts, Doh!!!
  • Next by Date: Re: Biased Random[Integer]?
  • Previous by thread: Re: Showing a limited GrayLevel
  • Next by thread: RE: Showing a limited GrayLevel