Re: Plotting piecewise in 2D

*To*: mathgroup at smc.vnet.net*Subject*: [mg109751] Re: Plotting piecewise in 2D*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Fri, 14 May 2010 19:58:06 -0400 (EDT)

Because it is hard to see a point? However, the following shows an excessively large area: DensityPlot[ If[Abs[x] < 0.001 && Abs[y] < 0.001, 1000, 0], {x, -1, 1}, {y, -1, 1}] "If" is a programming construct not a mathematical function. Piecewise works better. DensityPlot[ Piecewise[{{1000, Abs[x] < 0.001 && Abs[y] < 0.001}}], {x, -1, 1}, {y, -1, 1}] Bob Hanlon ---- Jim Lambaugh <lambaugh at gmail.com> wrote: ============= Hi Please take a look at DensityPlot[If[x == 0 && y == 0, 1000, 0], {x, -1, 1}, {y, -1, 1}] This just gives me a uniform plot. Why does the peak at (0,0) not show up? Best, Jimmy.