A331015 Self-locating strings within Euler-Mascheroni Constant (gamma), strings k at position k (taking gamma offset 1).
57, 16939, 767158, 5505709, 6674196, 7418985, 18873720
Offset: 1
Examples
57 is a term because the 57th digit is 5 and the 58th digit is 7.
Crossrefs
Programs
-
Mathematica
dgamma = RealDigits[EulerGamma, 10, 1000010][[1]]; Select[Range[1000000], FromDigits[Take[dgamma, {#, # - 1 + IntegerLength[#]}]] == # &] (* Vaclav Kotesovec, Feb 18 2020 *)
Comments