A253788 Row products of irregular tables A252753 & A252755.

1, 2, 12, 2160, 1905120000, 1034766105221882880000000, 139870330430486189977277369128961542673635737600000000000000

Offset

0,2

Links

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

Formula

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

Prog

(Scheme)
(define (A253788 n) (if (zero? n) 1 (mul A252753 (A000079 (- n 1)) (A000225 n))))
(define (mul intfun lowlim uplim) (let multloop ((i lowlim) (res 1)) (cond ((> i uplim) res) (else (multloop (+ 1 i) (* res (intfun i)))))))

Crossrefs

Cf. A253787 (the corresponding sums).

Cf. A000079, A000225, A252738, A252753, A252755.

Sequence in context: A090904 A125295 A222065 * A252738 A360067 A357766

Adjacent sequences: A253785 A253786 A253787 * A253789 A253790 A253791

Keyword

nonn

Author

Antti Karttunen, Jan 13 2015

Status

approved