I successfully solved another pmf, but then I accidentally lost the equation after copying down the result. Now I can't recreate the result!
This is what I'm trying:
q = ((T - 1)/T)^i;
p = (1/T) q;
pmf = if[i = n, q, p];
-Sum[#, {n, 0, Infinity}] & /@ (pmf Log[pmf] // PowerExpand // Expand)
And I previously got a result of:
-((-1 + T) Log[-1 + T]) + T Log[T]
which I verified numerically against other data I have.
But now when I run the above commands, I get a very ambiguous result that is hardly simplified at all.
What am I going wrong in trying to recreate the result? It seemed to easy the first time.