A277533 - OEIS

A277533

Value of decimal number corresponding to the string of equal digits starting at position A277532(n) after the decimal point in the decimal expansion of the Euler-Mascheroni constant.

%I #4 Oct 24 2016 04:33:09

%S 5,77,777,0,0,333333

%N Value of decimal number corresponding to the string of equal digits starting at position A277532(n) after the decimal point in the decimal expansion of the Euler-Mascheroni constant.

%F a(n) = A001620(A277532(n)) * A002275(n).

%o (PARI) emstring(n) = default(realprecision, n+10); my(x=Euler); floor(x*10^n)

%o emdigit(n) = emstring(n)-10*emstring(n-1)

%o searchstrval(n) = my(x=1, i=1); while(1, my(y=x+1); while(emdigit(y)==emdigit(x), y++; i++); if(i >= n, return(emdigit(x)*(10^n-1)/9)); i=1; x++)

%o a(n) = searchstrval(n)

%Y Cf. A001620, A049522, A244601, A244602, A277259, A277260, A277532.

%K nonn,base,more

%O 1,1

%A _Felix Fröhlich_, Oct 19 2016