Plot[((0.1tanh[x]+0.15)^1.5+(0.1tanh[x]+0.15)^0.05)/((0.1tanh[x]+0.15)+(0.1tanh[x]+0.15)^0.045),{x,-3,3}]