Re: Hatched shading?

*To*: mathgroup at smc.vnet.net*Subject*: [mg111125] Re: Hatched shading?*From*: "E. Martin-Serrano" <eMartinSerrano at telefonica.net>*Date*: Wed, 21 Jul 2010 07:12:39 -0400 (EDT)

Hi, Yes. Using your code I also got two protruding red lines, one in each blue plot. Version: {7.0 for Microsoft Windows (32-bit), Release: 1} E. Martin-Serrano -----Original Message----- From: ADL [mailto:alberto.dilullo at tiscali.it] Sent: Tuesday, July 20, 2010 9:42 AM To: mathgroup at smc.vnet.net Subject: [mg111125] [mg111091] Re: Hatched shading? Following what Bob brilliantly suggested, I found a possible bug in Mathematica 7.0.1 for Windows. If you type the following, you will get a couple of red lines getting out of their boundary: f[x_] := Sin[x]; Plot[ {Table[(x - k)/3, {k, -3, 3, .10}], f[3x]}, {x, 0, 3}, PlotRange -> {0, 1}, RegionFunction -> Function[{x, y}, 0 < y <= f[3x]], PlotStyle -> { Directive[ AbsoluteThickness[4], Red], Directive[ Thick, Blue] } ] Does anybody else confirms this? ADL On 18 Lug, 07:06, Bob Hanlon <hanl... at cox.net> wrote: > I forget to copy the definition of f[x] that I was using as an example > > f[x_] = Exp[-x] > > Bob Hanlon