TrigExpand[Sin[2a]]

Input

TrigExpand[sin(2 a)]

Result

2 sin(a) cos(a)

Plot

Plot
Plot

Alternate form

1/2 i e^(-2 i a) - 1/2 i e^(2 i a)