A072679 a(n) = (3*(n-1)+3)! *(3*(n-1)+6)! *2F2(3*n+1,3*n+4; 4,7; 1)/( 3! *6! *exp(1)), where 2F2(;;) is the generalized hypergeometric series.

1, 207775, 566828686621, 9011375448568566265, 545354187810192396620158501, 96830939680123110993863214244502671, 42331916293179268263941025436198550595621985

Offset

1,2

Links

Table of n, a(n) for n=1..7.

Maple

A072679 := proc(n)
        (3*(n-1)+3)! *(3*(n-1)+6)! *hypergeom([3*n+1, 3*n+4], [ 4, 7], 1)/( 3! *6! *exp(1)) ;
        simplify(%) ;
end proc:
seq(A072679(n), n=1..5) ; # R. J. Mathar, Nov 08 2011

Mathematica

Table[(3*(n-1)+3)! * (3*(n-1)+6)! * HypergeometricPFQ[{3*n+1, 3*n+4}, {4, 7}, 1] /( 3! *6! *E), {n, 1, 20}] (* Vaclav Kotesovec, Jul 05 2018 *)

Crossrefs

Sequence in context: A092011 A362758 A216900 * A147705 A237971 A282989

Adjacent sequences: A072676 A072677 A072678 * A072680 A072681 A072682

Keyword

nonn

Author

Karol A. Penson, Jul 01 2002

Status

approved