login
A299197
Number of partitions of n into distinct parts that are greater of twin primes (A006512).
1
1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 2, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 2, 2, 0, 0, 0, 1, 1, 2, 1, 0, 0, 0, 2, 2, 1, 0, 0, 0, 2, 2, 2, 0, 0, 1, 1, 3, 1, 1, 0, 0, 2, 3, 2, 0, 0, 1, 2, 3, 2, 1, 0, 0, 2, 3, 3, 0, 0, 0, 1, 4, 3, 1, 0, 0, 2, 3, 3, 2, 0, 0, 1, 4, 4
OFFSET
0,32
FORMULA
G.f.: Product_{k>=1} (1 + x^A006512(k)).
EXAMPLE
a(31) = 2 because we have [31] and [19, 7, 5].
MATHEMATICA
nmax = 105; CoefficientList[Series[Product[1 + Boole[PrimeQ[k] && PrimeQ[k - 2]] x^k, {k, 1, nmax}], {x, 0, nmax}], x]
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Feb 04 2018
STATUS
approved