0
$\begingroup$

enter image description here

I don't know how to plot these functions in Mathematica. Please show me how to do it.

$\endgroup$

closed as off-topic by corey979, José Antonio Díaz Navas, Coolwater, Henrik Schumacher, Michael E2 Feb 23 '18 at 3:24

This question appears to be off-topic. The users who voted to close gave this specific reason:

  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – corey979, José Antonio Díaz Navas, Coolwater, Henrik Schumacher, Michael E2
If this question can be reworded to fit the rules in the help center, please edit the question.

  • 3
    $\begingroup$ Do you know how to plot just one of these functions in Mathematica? If not, look up the documentation for Plot and Piecewise. If you do, then just make a Table of the Plots and use GraphicsRow or GraphicsGrid or GraphicsColumn. The documentation for each of these functions is pretty good. So start there. $\endgroup$ – march Feb 22 '18 at 6:19
1
$\begingroup$

I will show you how to implement the most difficult of the four cases you show in your question. It will be up to you study this example and use it as a model for writing the other cases on your own.

Psi[n_, T_, i_][t_] /; EvenQ[i] && 2 <= i <= n - 2 :=
  Module[{h = T/n},
    Piecewise[
      {{(t - (i - 1) h) (t - (i - 2) h)/(2 h^2), (i - 2) h <= t <= i h},
       {(t - (i + 1) h) (t - (i + 2) h)/(2 h^2), i h <= t <= (i + 2) h}},
      0]]

Then

Plot[Psi[4, 1, 2][t], {t, 0, 1}]

plot1

and

Plot[Psi[5, 2, 2][t], {t, 0, 2}]

plot2

For you, there may be much new Mathematica material in the above function definition. But you will need to master the new material if you want to be able to implement functions of the kind your textbook is describing.

At least, now you know what functions to look up in Mathematica documentation. I will give you a hint: to learn about /;, look up Condition.

$\endgroup$
  • $\begingroup$ @karthickmaths. No, sorry, I do not share my email address on-line. Also, I am not a Mathematica consultant. $\endgroup$ – m_goldberg Mar 21 '18 at 13:02
  • $\begingroup$ @karthickmaths. Please put that one problem before the community by posting it as a new question. That's the way this site works. I might answer it, or somebody else might. Don't try to rely on one person. $\endgroup$ – m_goldberg Mar 24 '18 at 4:56

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