|
%I #38 Sep 21 2012 18:41:26
%S 1,1,2,7,1,5,8,8,4,2,9,1,1,4,1,2,6,4,3,6,6,4,9,8,5,6,3,3,7,4,9,3,5,6,
%T 4,2,9,1,4,5,0,8,5,2,8,6,3,1,1,9,4,0,7,6,2,4,3,8,0,5,9,4,2,3,0,3,8,6,
%U 8,1,8,4,7,0,3,9,7,1,3,8,0,6,9,5,6,8,1,7,3,4,9,9,8,5,2,0,3,7,5,7,2,8,1,9,3
%N Decimal expansion of Sum_{n = 1 .. infinity } 1 / L(n)^n where L(n) is the n-th Lucas number.
%e 1.12715884291141264366... = 1/1^1 + 1/3^2+ 1/4^3+ 1/7^4 +1/11^5 +1/18^6 +….
%t RealDigits[N[Sum[1/LucasL[n]^n, {n, 1, 105}], 105]][[1]]
%Y Cf. A000204.
%K nonn,cons
%O 1,3
%A _Michel Lagneau_, Sep 21 2012
|
