OFFSET
1,2
COMMENTS
This is a permutation of the positive integers; the inverse permutation is A356419. - Jianing Song, Aug 06 2022
LINKS
Ivan Neretin, Table of n, a(n) for n = 1..8001 (126 antidiagonals)
EXAMPLE
Array begins:
j=1 j=2 j=3 j=4 j=5 j=6
i=1: 1, 2, 4, 8, 16, 32, ...
i=2: 3, 5, 6, 9, 10, 12, ...
i=3: 7, 11, 13, 14, 19, 21, ...
i=4: 15, 23, 27, 29, 30, 39, ...
i=5: 31, 47, 55, 59, 61, 62, ...
i=6: 63, 95, 111, 119, 123, 125, ...
MATHEMATICA
a = {}; Do[ a = Append[a, Last[ Take[ Select[ Range[2^13], Count[ IntegerDigits[ #, 2], 1] == j & ], i - j]]], {i, 2, 12}, {j, 1, i - 1} ]; a
CROSSREFS
KEYWORD
AUTHOR
Robert G. Wilson v, Jan 30 2002
STATUS
approved