OFFSET
1,2
EXAMPLE
a(1) = 0 because number 0 is missing in first 10^1 = 10 digits after decimal point in expansion of Euler's constant, that is, 0.5772156649....
MATHEMATICA
Do[With[{r = ToString[FromDigits[Rest[RealDigits[EulerGamma, 10, 10^k][[1]]]]]}, Do[If[StringPosition[r, ToString[n]] == {}, Print[n]; k = k + 1; Break[]], {n, 0, 10000000}]], {k, 1, 7}]
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Shyam Sunder Gupta, Sep 12 2013
STATUS
approved