Compare these:

   Plot[Sin[10x]+Cos[3x],{x,0,2Pi}]
   Plot[{Sin[10x],Sin[3x]},{x,0,2Pi}]

Modulate and filter the signal

a = Sin[f1* x];

b = Cos[(f1 + f2)*x];

c = -2*Select[
    a*b // TrigToExp // ExpandAll,
    FreeQ[#, f1, 4] &] // FullSimplify

sin(f2 x)

Bob Hanlon

---- Rick T <ratull...@gmail.com> wrote:

=============
Greetings All

I have the example below which produces 10 cycles
a = Sin[10 x]
Plot[a, {x, 0, 2 Pi}]

What Type of signal would I need to add/multiple/divide to reduce it's
signal/frequency to 5 cycles?  I know I can just change the number 10
to 5
but I need to combine it with another signal.  what mathematical
operation/signal do I need to use.