Solve[8 Log[x] - x ==0, x]