f[t_] = 2*Exp[-t]*Sin[t]
Plot[f[t],{t,0,10}]

g[t_] = 2*Exp[2*t]*Cos[3*t] - Exp[2*t]*Sin[3*t]
Plot[g[t],{t,0,4}]