A064813 a(n) = binomial(composite(n), n), where composite = A002808, composite numbers.

4, 15, 56, 126, 252, 924, 3432, 6435, 11440, 43758, 167960, 293930, 497420, 1961256, 3268760, 5311735, 8436285, 13123110, 54627300, 225792840, 354817320, 548354040, 834451800, 1251677700, 5414950296, 8122425444, 12033222880

Offset

1,1

Links

Harry J. Smith, Table of n, a(n) for n = 1..200

Prog

(PARI)j=0; i=4; while(i<100, while(isprime(i), i=i+1); j=j+1; print(binomial(i, j)); i=i+1)
(PARI) nextComp(n)= { if (!isprime(n), return(n)); return(n + 1) } { c=3; for (n=1, 200, c=nextComp(c + 1); write("b064813.txt", n, " ", binomial(c, n)) ) } \\ Harry J. Smith, Sep 27 2009

Crossrefs

Cf. A002808, A060604.

Sequence in context: A050183 A094375 A047018 * A183932 A009940 A081163

Adjacent sequences: A064810 A064811 A064812 * A064814 A064815 A064816

Keyword

nonn

Author

Reinhard Zumkeller, Oct 23 2001

Extensions

More terms from Matthew Conroy, Oct 30 2001

Status

approved