|
|
A266728
|
|
Stanley sequence S_5(0,3).
|
|
3
|
|
|
0, 3, 4, 5, 6, 8, 9, 10, 11, 13, 14, 15, 16, 18, 19, 21, 25, 28, 29, 30, 31, 33, 34, 35, 36, 38, 39, 40, 41, 43, 44, 46, 50, 53, 54, 55, 56, 58, 59, 60, 61, 63, 64, 65, 66, 68, 69, 71, 75, 78, 79, 80, 81, 83, 84, 85, 86, 88, 89, 90, 91, 93, 94, 96, 125, 128, 129, 130
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Lexicographic first increasing sequence with a(0) = 0, a(1) = 3 and for all n > 1, {a(0), ..., a(n)} does not contain 5 terms in arithmetic progression.
|
|
LINKS
|
|
|
PROG
|
A266728(n, show=1, L=5, v=[0, 3], D=v->v[2..-1]-v[1..-2])={ while(#v<=n, show&&print1(v[#v]", "); v=concat(v, v[#v]); while(v[#v]++, forvec(i=vector(L, j, [if(j<L, j, #v), #v]), #Set(D(vecextract(v, i)))>1||next(2), 2); break)); v[n+1]} \\ M. F. Hasler, Jan 18 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|