# How to animate a propagating wave?

How can I animate a progagating pulse wave in Mathematica, for example a gaussian curve. I would like to do that for whatever function I can think of. Thank you!

• Welcome! Have you searched the site for related topics yet? Also, please add more information and show us what you tried so far. – Yves Klett Nov 24 '15 at 16:45

For a sinusoidal wave:

Animate[
Plot[Sin[t + a], {t, 0, 10}],
{a, 0, 10}]


For a pulse:

Animate[
Plot[PDF[NormalDistribution[a, 1], t], {t, 0, 10}],
{a, 0, 10}]