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
Vincenzo Librandi, Table of n, a(n) for n = 1..1500
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
Simon Plouffe, Feb 20 2000
STATUS
approved
