MathGroup Archive 2003

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: plot help

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


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

From: Po-Wen Chiu [mailto:chiu at]
To: mathgroup at

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?




  • Prev by Date: Re: Re: Comment lines in different colour or font
  • Next by Date: Re: Re: Cursors in graphics
  • Previous by thread: Re: plot help
  • Next by thread: Cursor after InputAlias / InputAutoReplacement