|
|
A211967
|
|
Triangle of decimal equivalents of binary numbers with no initial repeats, A211027.
|
|
3
|
|
|
1, 2, 4, 5, 8, 9, 11, 16, 17, 18, 19, 22, 23, 32, 33, 34, 35, 37, 38, 39, 44, 46, 47, 64, 65, 66, 67, 68, 69, 70, 71, 74, 75, 76, 77, 78, 79, 88, 89, 92, 93, 94, 95, 128, 129, 130, 131, 132, 133, 134, 135, 137, 138, 139, 140, 141, 142, 143, 148, 149, 150
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
Irregular triangle begins:
1;
2;
4, 5;
8, 9, 11;
16, 17, 18, 19, 22, 23;
32, 33, 34, 35, 37, 38, 39, 44, 46, 47;
|
|
MAPLE
|
s:= proc(n) s(n):= `if`(n=1, [[1]], map(x->
[[x[], 0], [x[], 1]][], s(n-1))) end:
T:= proc(n) map (x-> add(x[i]*2^(nops(x)-i), i=1..nops(x)), select
(proc(l) local i; for i to iquo(nops(l), 2) do if l[1..i]=
l[i+1..2*i] then return false fi od; true end, s(n)))[] end:
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,tabf,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|