A219781 Decimal expansion of Sum_{n = -infinity..infinity} 5^(n/2)*((1+sqrt(5))/2)^(-n^2).
3, 5, 7, 6, 9, 7, 2, 7, 4, 8, 1, 3, 1, 6, 9, 4, 8, 5, 6, 5, 3, 9, 5, 1, 9, 7, 8, 4, 8, 5, 6, 3, 7, 4, 5, 3, 7, 5, 2, 8, 4, 0, 5, 3, 6, 5, 2, 3, 5, 2, 2, 2, 3, 0, 7, 7, 3, 6, 9, 7, 2, 7, 3, 7, 6, 1, 2, 6, 1, 7, 5, 8, 2, 7, 8, 1, 1, 1, 2, 7, 1, 7, 5, 7, 3, 0, 2
Offset: 1
Examples
3.5769727481316948565395...
Programs
-
Mathematica
RealDigits[N[Sum[5^(k/2)*((1+Sqrt[5])/2)^(-k^2), {k,-Infinity,Infinity}], 131], 10, 130][[1]]
Comments