|
%I #15 Jul 06 2019 15:40:08
%S 5,14,3,11,10,9,6,5,14,6,6,6,2,9,8,6,2,7,1,6,6,12,8,12,18,5,14,16,5,
%T 13,9,7,16,12,13,9,13,14,12,10,7,12,15,11,6,5,10,11,13,13,6,10,4,8,9,
%U 13,8,7,10,12,9,6,5,4,5,12,11,6,11,8,6,8,12,16,10,13,5,8,8,8,5,3,6,11,11,10
%N From decimal expansion of Euler's constant 0.57721566490...: 0+5, 7+7, 2+1, 5+6, 6+4, 9+0, ...
%H Jon E. Schoenfield, <a href="/A144518/b144518.txt">Table of n, a(n) for n=1..1000</a>, using data from A001620.
%e A001620(12)=1 and A001620(13)=5, so a(7)=1+5=6.
%e A001620(14)=3 and A001620(15)=2, so a(8)=3+2=5.
%e A001620(16)=8 and A001620(17)=6, so a(9)=8+6=14.
%e A001620(18)=0 and A001620(19)=6, so a(10)=0+6=6.
%e A001620(20)=0 and A001620(21)=6, so a(11)=0+6=6, etc.
%t Total/@Partition[Join[{0},RealDigits[EulerGamma,10,201][[1]]],2] (* _Harvey P. Dale_, Apr 05 2018 *)
%Y Cf. A001620, A152626.
%K nonn,base,easy
%O 1,1
%A _Juri-Stepan Gerasimov_, Dec 15 2008
%E Edited by _Jon E. Schoenfield_ and _N. J. A. Sloane_, Dec 21 2008
%E More terms from _Jon E. Schoenfield_ and _R. J. Mathar_, Jan 08 2009
|
