Input := wave1 = Cos[120 2 Pi t]
Output = Cos[240 Pi t]
Input := Plot[wave1, {t, 0, 0.1}]
Output = -Graphics-
Input := Play[wave1, {t, 0, 1}]
Output = -Sound-