It is not clearly explained in your post, what should be the result. I can only guess, that you would like to get the function (the one you posted) modified by some noise.
Here the function noisedSignal[] is introduced. Check Menu/Help/tutorial/DefiningFunctions. It contains your signal modified by the noise. The latter is represented by RandomReal. Check Menu/Help/RandomReal to get more information. noisedSignal makes a table out of your function. Its terms have the form {t, signal}. It depends upon the variables a, the limit of the noise amplitude, and delta - the interval between the time values in the table. Check Menu/Help/Table. Evaluate this:
noisedSignal[a_, \[Delta]_] :=
Table[{t,
Sin[2 Pi t]*(1 + (1/5) Sin[6 Pi t] + (1/10) Sin[8 Pi t]) +
RandomReal[{-a, a}]}, {t, -5, 5, \[Delta]}];
Evaluate also the following and play with the parameter a by moving the slider:
Manipulate[
ListPlot[noisedSignal[a, 0.001],
AxesLabel -> {Style["t", 14, Italic], Style["Signal", 14]}], {a,
0.1, 1}]
Have fun.
foo = Interpolation@Table[{x, RandomReal[{-0.2,0.2}]}, {x, -5, 5, 0.01}]; Plot[ Sin[x] + foo[x], {x, -5, 5}]
– einbandi Jun 4 '13 at 23:11data
in this answer? – Michael E2 Jun 4 '13 at 23:44