>>612
for loopをΣで書くと

f(j)= (1/60)Σ[i=1,60] C[59,i-1]/C[j,i]
Σ[k=60,100] k * f(j) / (Σ[j=60,100] f(j))

分数での計算をプログラム組んでさせると

> (E=sum(n*pdf)) # 期待値
Big Rational ('bigq') :
[1] 77453110029594251294/1232675015146841933
> asNumeric(E)
[1] 62.83336