This is a short Maple/Mathematica worksheet that plots an oscillatory function and asks the students to guess the representative Fourier series, which they plot and compare to the original. They are told that the series has three sine terms with integer coefficients. The idea is that students develop a feeling for what a Fourier series looks like graphically, rather than just as a mathematical expression, and for what graphical aspects are important (e.g., amplitude, zero-crossings, curvature changes). The activity is short enough to give the students control of the Maple/Mathematica code. An important aspect of this activity is that students must have a good grasp of what it means to add functions together, which they may not have done explicitly before.
osfourierguess.mw (Maple 13)
osfourierguess.mws (Maple 11 Classic)