Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A129600
Array A(i,j) of binary run-length encoded product of i and j, read by ascending antidiagonals.
3
0, 1, 1, 2, 3, 2, 3, 4, 4, 3, 4, 7, 6, 7, 4, 5, 8, 8, 8, 8, 5, 6, 11, 12, 15, 12, 11, 6, 7, 12, 9, 16, 16, 9, 12, 7, 8, 15, 14, 23, 24, 23, 14, 15, 8, 9, 16, 16, 24, 19, 19, 24, 16, 16, 9, 10, 19, 24, 31, 28, 13, 28, 31, 24, 19, 10, 11, 20, 17, 32, 32, 17, 17, 32, 32, 17, 20, 11, 12
OFFSET
0,4
FORMULA
A(i,j) = A075158(((A075157(i)+1)*(A075157(j)+1)) - 1).
PROG
(MIT/GNU Scheme)
(define (A129600bi col row) (A075158 (-1+ (* (1+ (A075157 col)) (1+ (A075157 row))))))
(define (A129600 n) (A129600bi (A025581 n) (A002262 n)))
CROSSREFS
Cf. A129602 (center diagonal), A014601 (row 1 apart from the first term).
Sequence in context: A143998 A054237 A360495 * A355663 A081388 A231070
KEYWORD
nonn,tabl
AUTHOR
Antti Karttunen, May 01 2007
EXTENSIONS
Name edited by Michel Marcus, Dec 01 2021
STATUS
approved