login
A277532
Position of first occurrence of at least n consecutive equal digits in the decimal expansion of the Euler-Mascheroni constant, starting after the decimal point.
2
0, 1, 72, 2346, 3422, 3892
OFFSET
1,3
COMMENTS
Smallest k such that A001620(k) = A001620(k+m) for all m with 0 <= m < n.
PROG
(PARI) emstring(n) = default(realprecision, n+10); my(x=Euler); floor(x*10^n)
emdigit(n) = emstring(n)-10*emstring(n-1)
searchstrpos(n) = my(x=1, i=1); while(1, my(y=x+1); while(emdigit(y)==emdigit(x), y++; i++); if(i >= n, return(x-1)); i=1; x++)
a(n) = searchstrpos(n)
KEYWORD
nonn,base,more
AUTHOR
Felix Fröhlich, Oct 19 2016
STATUS
approved