A253787 Row sums of irregular tables A252753 & A252755.

1, 2, 7, 28, 124, 554, 2520, 11304, 50958, 229914, 1037436, 4682542, 21136380, 95409878

Offset

0,2

Links

Table of n, a(n) for n=0..13.

Formula

a(0) = 1; for n>1: a(n) = Sum_{k = A000079(n-1) .. A000225(n)} A252753(k) = Sum_{k = 2^(n-1) .. (2^n)-1} A252753(k).

Prog

(Scheme)
(define (A253787 n) (if (zero? n) 1 (add A252753 (A000079 (- n 1)) (A000225 n))))
(define (add intfun lowlim uplim) (let sumloop ((i lowlim) (res 0)) (cond ((> i uplim) res) (else (sumloop (+ 1 i) (+ res (intfun i)))))))

Crossrefs

Cf. A253788 (the corresponding products).

Cf. A252737, A252753, A252755.

Sequence in context: A291091 A215973 A143927 * A060379 A002931 A088702

Adjacent sequences: A253784 A253785 A253786 * A253788 A253789 A253790

Keyword

nonn,more

Author

Antti Karttunen, Jan 13 2015

Status

approved