question about plot
- To: mathgroup at smc.vnet.net
- Subject: [mg69652] question about plot
- From: dimmechan at yahoo.com
- Date: Tue, 19 Sep 2006 05:45:23 -0400 (EDT)
Hi.
I define a delta sequence.
Needs["Graphics`"]
delta[n_, x_] := n/(Sqrt[Pi]/E^((-n^2)*x^2))
I can't understand what I do wrong in the following command.
I really appreciate any comments.
Show[(Plot[delta[#1, x], {x, -2, 2}, DisplayFunction -> Identity,
PlotRange -> All, ImageSize -> {800, 500}, PlotStyle -> Hue[#1],
PlotLegend -> StringJoin["n= ", ToString[#1]]] & ) /@ Range[0, 10],
DisplayFunction -> $DisplayFunction]
Thanks