Translate

Author

Eric W. Weisstein
April 8, 2002

This notebook downloaded from http://mathworld.wolfram.com/notebooks/PlaneGeometry/Translate.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/Translate.html.

©2005 Wolfram Research, Inc. except for portions noted otherwise

Initialization

<<Graphics`Colors`

Plot

Plot[Evaluate[Sin[x-#]/(x-#)&/@{-1,0,2}],{x,-10,10},PlotStyle->{Red,Black,Blue}]