Compact-Open Topology

Author

Eric W. Weisstein
April 5, 2006

This notebook downloaded from http://mathworld.wolfram.com/notebooks/Topology/Compact-OpenToplogy.nb.

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

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

Additional Authors

Illustration by Todd Rowland

Animation

ai[n_,opts___]:=Plot[(1/(n+1))Sin[n x/2]+E^(-n^2/2) x^(2n),{x,-10,10},PlotRange->{{-10,10},{-1,1}},opts]

<<Utilities`GIF`

Export[gifs<>"compopen.gif",Table[ai[n],{n,10}]]

Show[GraphicsArray[
Partition[Table[ai[n,Ticks->None,DisplayFunction->Identity],{n,10}],3]
]]