Limit[(x*E^(-1/Abs[x])-x^3)/(Sin[4x]-E^(2x)*Ln[1+4x]),x->0]