

A228083


Table of binary Selfnumbers and their descendants; square array T(r,c), with row r>=1, column c>=1, read by antidiagonals.


7



1, 2, 4, 3, 5, 6, 5, 7, 8, 13, 7, 10, 9, 16, 15, 10, 12, 11, 17, 19, 18, 12, 14, 14, 19, 22, 20, 21, 14, 17, 17, 22, 25, 22, 24, 23, 17, 19, 19, 25, 28, 25, 26, 27, 30, 19, 22, 22, 28, 31, 28, 29, 31, 34, 32, 22, 25, 25, 31, 36, 31, 33, 36, 36, 33, 37
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


LINKS

Antti Karttunen, The first 141 antidiagonals of the table, flattened
Index entries for Colombian or self numbers and related sequences


FORMULA

T(r,1) are those numbers not of form n + sum of binary digits of n (binary Self numbers) = A010061(r);
T(r,c) = T(r,c1) + sum of binary digits of T(r,c1) = A092391(T(r,c1)).


EXAMPLE

The topleft corner of the square array:
1, 2 , 3, 5, 7, 10, 12, 14, ...
4, 5, 7, 10, 12, 14, 17, 19, ...
6, 8, 9, 11, 14, 17, 19, 22, ...
13, 16, 17, 19, 22, 25, 28, 31, ...
15, 19, 22, 25, 28, 31, 36, 38, ...
18, 20, 22, 25, 28, 31, 36, 38, ...
21, 24, 26, 29, 33, 35, 38, 41, ...
23, 27, 31, 36, 38, 41, 44, 47, ...
...
The noninitial terms on each row are obtained by adding to the preceding term the number of 1bits in its binary representation (A000120).


PROG

(Scheme, with Antti Karttunen's IntSeqlibrary)
(define (A228083 n) (A228083bi (A002260 n) (A004736 n)))
(define (A228083bi row col) ((rowfunforA228083 row) col))
(definec (rowfunforA228083 n) (implementcachedfunction 0 (rowfunn k) (cond ((= 1 k) (A010061 n)) (else (A092391 (rowfunn ( k 1)))))))


CROSSREFS

First column: A010061. First row: A010062. Transpose: A228084. See A151942 for decimal analog.
Cf. also A000120, A092391, A227643, A228082, A228085, A228086, A228087, A228088, A228091, A218254.
Sequence in context: A124938 A198342 A081725 * A222234 A131042 A274631
Adjacent sequences: A228080 A228081 A228082 * A228084 A228085 A228086


KEYWORD

nonn,base,tabl


AUTHOR

Antti Karttunen, Aug 09 2013


STATUS

approved



