- #1

- 753

- 2

## Main Question or Discussion Point

## Homework Statement

How do you make an animation with Mathematica?

## Homework Equations

Table[Plot3D[3Sech[(1/2)*(-t+x)]+12Sech[(1/2)*(-8t+2x)]+27Sech[(1/2)*(-27t+3x)],{x,0,10},{t,0,14},Axes->False,PlotRange->{0,10}],{t,0,9}] // Short

## The Attempt at a Solution

My attempt above spits out a whole column of the same image. Do you know what's wrong?