Plot[{Sin[Sin[x]],Cos[Cos[x]]},{x,-Pi,Pi}]