0
$\begingroup$

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

enter image description here

$\endgroup$
1
  • $\begingroup$ 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 $\endgroup$
    – Sektor
    Apr 13 '15 at 7:46
1
$\begingroup$
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.

$\endgroup$
1
  • $\begingroup$ Thanks Pickett. I didn't know about Map command. $\endgroup$
    – user156720
    Apr 13 '15 at 12:53
3
$\begingroup$

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

Mathematica graphics

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

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

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.