- #1
ydydry
- 4
- 0
Hi all, I have an apparently simple equation. I copy here its Mathematica code:
Sum[(p/(1 - p))^s*(q/(1 - q))^s*Binomial[n, s]*(Binomial[m - 1, s]*(p*q*(m + n) + (2*m - 1)*(-p - q + 1))), {s, 0, n}] == Sum[(p/(1 - p))^s*(q/(1 - q))^s*Binomial[n, s]*((-(-p - q + 1))*Binomial[m - 2, s] + m*p*q*Binomial[m, s] + m*(-p - q + 1)*(Binomial[m - 2, s] + Binomial[m, s])), {s, 0, n}]
Mathematica's FullSimplify command immediately tells me that it is an identity, giving me "True" as output, but I fail to see the analytical reason.
All parameters are weakly positive and reals, although I do not need to assume anything for Mathematica to tell me that it is indeed an identity.
Thanks a lot!
Sum[(p/(1 - p))^s*(q/(1 - q))^s*Binomial[n, s]*(Binomial[m - 1, s]*(p*q*(m + n) + (2*m - 1)*(-p - q + 1))), {s, 0, n}] == Sum[(p/(1 - p))^s*(q/(1 - q))^s*Binomial[n, s]*((-(-p - q + 1))*Binomial[m - 2, s] + m*p*q*Binomial[m, s] + m*(-p - q + 1)*(Binomial[m - 2, s] + Binomial[m, s])), {s, 0, n}]
Mathematica's FullSimplify command immediately tells me that it is an identity, giving me "True" as output, but I fail to see the analytical reason.
All parameters are weakly positive and reals, although I do not need to assume anything for Mathematica to tell me that it is indeed an identity.
Thanks a lot!