answered 2 years ago
Instead,
solve(e^derivative(-x*log(x) -(1-x)*log(1-x),x)==1,x)
gives
[x == (1/2)]
updated 2 years ago