|
|
A054306
|
|
Positions of 0's in the decimal expansion of Euler's constant.
|
|
4
|
|
|
11, 18, 20, 25, 27, 28, 32, 37, 56, 81, 88, 113, 115, 120, 123, 125, 127, 161, 162, 196, 202, 203, 209, 219, 245, 248, 259, 263, 267, 268, 286, 290, 301, 322, 330, 350, 353, 368, 370, 376, 391, 393, 404, 405, 434, 446, 452, 454, 465, 474, 478, 481, 483, 494
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
One might have included an initial 0. Euler's constant is gamma = 0.5772156649015328606065120900824024310..., cf. A001620. - M. F. Hasler, Jan 20 2018
|
|
LINKS
|
|
|
MATHEMATICA
|
Position[First@ RealDigits[EulerGamma, 10, 10^3], 0][[All, 1]] (* Michael De Vlieger, Jan 20 2018 *)
Flatten[Position[RealDigits[EulerGamma, 10, 500] [[1]], 0]] (* Vincenzo Librandi, Jan 21 2018 *)
|
|
PROG
|
(PARI) default(realprecision, 500); for(k=1, 500, Euler\.1^k%10||print1(k", ")) \\ M. F. Hasler, Jan 20 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|