login
A051850
a(n) = A051849(n)/floor(log_2(n)+1).
2
1, 1, 2, 1, 2, 3, 7, 1, 2, 3, 4, 8, 9, 14, 39, 1, 2, 3, 4, 5, 9, 10, 11, 16, 17, 23, 52, 53, 59, 95, 311, 1, 2, 3, 4, 5, 6, 10, 11, 12, 13, 18, 19, 20, 26, 27, 34, 67, 68, 69, 75, 76, 83, 124, 125, 132, 181, 467, 468, 475, 524, 867, 3268, 1, 2, 3, 4, 5, 6, 7, 11, 12, 13, 14, 15
OFFSET
1,3
EXAMPLE
n-th row has length 2^(n-1) (A000079[n-1]) 1; 1,2; 1,2,3,7; 1,2,3,4,8,9,14,39; 1,2,3,4,5,9,10,11,16,17,23,52,53,59,95,311;
MAPLE
with(combinat); rows_upto_u := proc(u) local a, n; a := []; for n from 1 to u do a := [op(a), op(map(divby, sort(map(list_in_base_b, map(op, map(permute, partition(n))), (n+1))), n))]; od; RETURN(a); end; divby := (n, d) -> n/d;
CROSSREFS
Sequence in context: A122086 A082594 A376050 * A077013 A086880 A120405
KEYWORD
easy,nonn,tabf
AUTHOR
Antti Karttunen, Dec 13 1999
STATUS
approved