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

Author

Reinhard Zumkeller, Oct 23 2001

Keywords

• nonn

Links

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

Crossrefs

Cf. A002808, A060604.

Programs

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

Extensions

More terms from Matthew Conroy, Oct 30 2001