# Drawing nodal lines of wave equation

I am new to Mathematica and I want to produce the following figure wich represents the nodal lines of wave equation. Can anyone help?

• Yes, you can help yourself. By opening the documentation and reading. Now being serious if you have any code you would like to share that's a great start Apr 13 '15 at 7:46

data = {
{"-", "+"},
{"+", "-"},
{"-", "+"}
};
styled = Map[Style[#, 20] &, data, {2}];

GraphicsGrid[styled, Frame -> All]


Since you are new I suppose you might not know about the third argument of Map. Try evaluating Map[g, data, {2}] to see what it does.

You can create each of the three figures like this and then combine them using Row.

• Thanks Pickett. I didn't know about Map command. Apr 13 '15 at 12:53

There is a demo that generate the actual wave itself with "nodal" lines with 3D view as well. With many other options.

http://demonstrations.wolfram.com/VibrationOfARectangularMembrane/

• This is a comment, not a an answer. Apr 13 '15 at 9:02
• @Pickett it is not an answer, that is why it is a wiki. Apr 13 '15 at 9:03
• A community wiki is meant to be a collaborative answer, not a comment. Apr 13 '15 at 9:09
• It's already not a comment. Apr 13 '15 at 10:33
• In my view, this community wiki answers the question (though to an extent beyond what's asked for). Apr 13 '15 at 11:43