I am trying to solve an equation with respect to the variable w. However, although Maple seems to have solution, when I evaluate it, the answer (Maple gives 0) does not reflect the plot:
S*(-P*(-2*d*w+P+d)*ln(-2*d*w+P+d)+P*w*(-d+P)*ln(-d+P)-(-1+w)*(P*(d+P)*ln(d+P)-2*d^2*w))/(2*d^2*(-1+w)*w) = 0
The plot was created by setting P = 1/2 and d = 1/10:
plot(eval(S*(-P*(-2*d*w+P+d)*ln(-2*d*w+P+d)+P*w*(-d+P)*ln(-d+P)-(-1+w)*(P*(d+P)*ln(d+P)-2*d^2*w))/(2*d^2*(-1+w)*w), {P = 1/2, S = 1, d = 1/10}), w = 0 .. 1)