Weird Plot behavior...

*To*: mathgroup at smc.vnet.net*Subject*: [mg22268] Weird Plot behavior...*From*: dougmckee at my-deja.com*Date*: Mon, 21 Feb 2000 20:00:30 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

I'm getting some strange, seemingly incorrect graphs from Mathematica 3: First I define a simple piecewise continuous function: sf[x_]:=If[x<(1/3),1-3 x,0.5 x - 1/6] Then I graph its 4th iterate on [0,1] (along with y=x): Plot[{sf[sf[sf[sf[x]]]],x},{x,0,1}] It's missing some information; in particular, the graph only shows 5 fixed points when I know there are 7. And when I graph it on [0,2], I _do_ get all 7 fixed points, and, yes, they're all on [0,1]: Plot[{sf[sf[sf[sf[x]]]],x},{x,0,2}] What's going on? Why is the first graph incorrect, and the second correct? Plot[{sf[sf[sf[sf[x]]]],x},{x,0,1},PlotDivision- >5] And here, even though I think I'm setting the PlotDivision _lower_ than the default (20), I get the right graph! Doug Sent via Deja.com http://www.deja.com/ Before you buy.