|
COMMENTS
|
1. We may never know if a(n) is defined for all n.
2. We split up the digits of any number > 9 in the pattern, e.g., if n = 11, we search for the pattern "1,2,3,4,5,6,7,8,9,1,0,1,1".
3. The pattern "1,2,3,4,5" does not occur before the 100,000th term in the digit sequence of e.
|
|
MATHEMATICA
|
p = ToString[N[E, 100000]/10]; t = {1, 12, 123, 1234}; g[n_] := StringPosition[p, ToString[n]][[1]][[1]] - 2; Table[g[t[[i]]], {i, 1, 4}]
|