Plot[{Exp[x],Exp[2x],Exp[3x],Exp[x/2],Exp[x/3]},{x,-1,1}]

Plot[{Log[x],2*Log[x],3*Log[x],Log[x]/2,Log[x]/3},{x,0,4}]