RE: plot help

*To*: mathgroup at smc.vnet.net*Subject*: [mg39590] RE: [mg39572] plot help*From*: "David Park" <djmp at earthlink.net>*Date*: Tue, 25 Feb 2003 02:55:34 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

Po-Wen, I believe that what you want to do is plot a series of curves or functions. Let's first make a table of the functions. bands = Table[k^2 + y, {y, -3, 3}] {-3 + k^2, -2 + k^2, -1 + k^2, k^2, 1 + k^2, 2 + k^2, 3 + k^2} The Plot statement then allows us to plot them all at once. However we have to use Evaluate so that Plot will actually substitute the table of functions before it starts to substitute values of k. Here is your plot with a Frame, FrameLabels and a PlotLabel. Plot[bands // Evaluate, {k, -Pi, Pi}, Frame -> True, FrameLabel -> {k, "Bands"}, PlotLabel -> "Energy Band Structure", ImageSize -> 500]; You can copy the above statements directly into your notebook. David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Po-Wen Chiu [mailto:chiu at fkf.mpg.de] To: mathgroup at smc.vnet.net Dear Mathgroup, I am a new mathetica user and learning to plot my band diagram, i.e., energy E vs wave vector k. Assumed that E(k, y) and y is a series of integers. I use the following function: Plot[k^2+y, {k, -Pi, Pi}, {y, -3, 3}] and would like to plot "a series of" bands in a 2D plot, however, it did not work. Anybody can help me out? Thanks, Regards, Po-Wen