| Author |
Comment/Response |
GC
|
11/01/12 10:17am
I attached the Excel file (that gives me exact results) and here I post, again, how i tried to replicate it in Mathematica:
Plot[\!\(
\*UnderoverscriptBox[\(\[Sum]\), \(i = 0\), \(n\)]
\*FractionBox[\(Log[100 +
\*SuperscriptBox[\(2\), \(n\)] - 1] - Log[100]\),
SuperscriptBox[\(2\), \(n + 1\)]]\), {n, 0, 30}]
Thanks in advance.
Attachment: St-P_paradox.xls, URL: , |
|