A030597 Length of n-th run of digit 2 in A030588.

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 2, 2, 2

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Links

• Antti Karttunen, Table of n, a(n) for n = 1..20000

Crossrefs

Cf. A030588, A030596, A030598, A030599, A030600.

Programs

PARI

up_to = 20000;
A030597list(up_to,d=2) = { my(v=vector(up_to),ds=List([]),o=1,j=1,rl=0,i=0); while(i#ds,ds=digits(o,6);j=1;o+=2); if(d==ds[j],rl++,if(rl,i++; v[i] = rl; rl=0)); j++); (v); };
v030597 = A030597list(up_to);
A030597(n) = v030597[n]; \\ Antti Karttunen, Dec 24 2018

Extensions

Terms corrected (first incorrect term was at a(61)) and more terms added by Antti Karttunen, Dec 24 2018