A211967 Triangle of decimal equivalents of binary numbers with no initial repeats, A211027.

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

Offset: 1

Author

Omar E. Pol, Nov 30 2012

Keywords

• nonn
• tabf
• base

Examples

			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;
		

Links

• Alois P. Heinz, Rows n = 1..15, flattened
• Index entries for sequences related to curling numbers

Crossrefs

Columns 1-2 give: A000079(n-1), A000051(n-1) for n>2. Row n has length A093371(n). Right border gives A083329(n-1).

Cf. A122536, A211029, A211968, A211969, A216955.

Programs

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:
seq (T(n), n=1..8);  # Alois P. Heinz, Dec 03 2012