OFFSET
0,2
LINKS
FORMULA
EXAMPLE
The top left corner of the array:
1, 2, 6, 30, 210, 2310, 30030
3, 8, 36, 240, 2520, 32340, 540540
11, 44, 276, 2760, 34860, 572880, 10750740
55, 320, 3036, 37620, 607740, 11323620, 253753500
375, 3356, 40656, 645360, 11931360, 265077120, 7422334920
3731, 44012, 686016, 12576720, 277008480, 7687412040, 235239464460
MATHEMATICA
primorial[n_] := Product[Prime[k], {k, 1, n}]; A[n_, k_] := Sum[Binomial[n, j]*primorial[k+j], {j, 0, n}]; Table[A[n-k, k], {n, 0, 9}, {k, n, 0, -1}] // Flatten (* Jean-François Alcover, Jan 22 2017 *)
PROG
(Scheme)
(define (A276586bi row col) (A276085 (A066117bi (+ 1 row) (+ 1 col))))
(PARI) P(n)=prod(i=1, n, prime(i));
T(n, k) = sum(j=0, n, binomial(n, j)*P(k + j));
for(n=0, 10, for(k=0, n, print1(T(k, n - k), ", "); ); print(); ) \\ Indranil Ghosh, Apr 11 2017
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Antti Karttunen, Sep 18 2016
STATUS
approved