A230764 Length of chunks of even digits, delimited by an odd digit, in the concatenation of all terms; smallest such sequence without repeated terms.
1, 2, 3, 4, 6, 5, 8, 20, 7, 22, 24, 21, 26, 28, 9, 40, 42, 44, 23, 46, 48, 60, 62, 64, 66, 68, 80, 82, 25, 84, 86, 88, 10, 200, 202, 204, 206, 208, 220, 201, 222, 224, 226, 228, 240, 242, 244, 203, 246, 248, 260, 262, 264, 266, 205, 268, 280, 282, 284, 286
Offset: 1
Links
- E. Angelini, Cut the sequence after it's odd/even digits, SeqFan List, Oct 29 2013
Programs
-
PARI
A230764_vec(n, a=[], s=[],u=0)={my(check(a, s)=my(L=0, j=1); !for(i=1, #s, ( i>L+a[j] || (( i==L+a[j] )!= bittest(s[i],0))) && return; bittest(s[i],0) || next; L=i; j++)); check(a, s)||return; n-- || return(a); my(t); for(k=1, 9e9, bittest(u,k)&&next; (t=A230764_vec(n, concat(a, k), concat(s, digits(k)), u+2^k))&& return(t))}
Comments