login
Indices of the start of 9 successive distinct digits in the decimal expansion of e (2.718281828...).
1

%I #4 May 22 2015 14:58:35

%S 231,729,818,911,1730,1731,2031,2032,2033,2788,3420,3682,3683,3685,

%T 3796,4265,4486,4655,4656,4657,4692,5206,5207,5445,5446,5783,5836,

%U 5837,5840,6051,6063,8758,9756,9757,9954,9979,10003,10006,10123,10303,10321,10416

%N Indices of the start of 9 successive distinct digits in the decimal expansion of e (2.718281828...).

%e 231 is in the sequence because the 9 digits starting at the 231st digit of e are 8, 4, 1, 6, 7, 5, 0, 9, 2.

%o (PARI)

%o default(realprecision, 20080);

%o infix(v, a, b) = {my(i, s=[]); for(i=a, b, s=concat(s, v[i])); s}

%o pane(m) = {

%o L=List(); p=exp(1); for(n=1, 20000, d=floor(p); p=(p-d)*10; listput(L, d)); v=Vec(L);

%o s=[]; for(k=1, #v-m+1, in=infix(v, k, k+m-1); if(#in==#vecsort(in,,8), s=concat(s, k))); s

%o }

%o pane(9)

%Y Cf. A001113, A258166.

%K nonn,base

%O 1,1

%A _Colin Barker_, May 22 2015