A088576 Position of the first location of n in the decimal expansion of e.
14, 3, 1, 18, 11, 12, 21, 2, 4, 13, 196, 201, 371, 28, 224, 202, 95, 89, 3, 109, 112, 88, 253, 17, 34, 93, 31, 1, 5, 132, 72, 190, 111, 143, 144, 18, 20, 271, 86, 107, 67, 125, 98, 135, 240, 11, 104, 26, 229, 35, 236, 94, 16, 19, 77, 302, 154, 39, 326, 12, 21, 243, 33
Offset: 0
Examples
The first 7 is in the 2nd position of the digits of e, so a(7) = 2.
Links
- T. D. Noe, Table of n, a(n) for n = 0..10000
- Eric Weisstein's World of Mathematics, e Digits
- Eric Weisstein's World of Mathematics, Constant Digit Scanning
Crossrefs
Programs
-
Mathematica
Module[{nn=400,ed},ed=RealDigits[E,10,nn][[1]];Table[SequencePosition[ed,IntegerDigits[n],1][[1,1]],{n,0,70}]] (* Harvey P. Dale, Mar 30 2025 *)
-
PARI
trajedigitsd(n,m) = { default(realprecision,6000); p = exp(1)*10^5000; v = Vec(Str(p)); for(d=0,m, for(x=1,n, if(d<10, y = eval(v[x]), if(d<100, y = eval(v[x])*10 + eval(v[x+1]), if(d<1000, y = eval(v[x])*100 + eval(v[x+1])*10 + eval(v[x+2]), y = eval(v[x])*1000 + eval(v[x+1])*100 + eval(v[x+2])*10 + eval(v[x+3]) ); ); ); if(y == d,print1(x",");break); ); ) }
Comments