Solve[x^2==Log[x],x]