|
| |
|
|
A102623
|
|
Number of compositions into a prime number of distinct parts.
|
|
0
| |
|
|
0, 0, 2, 2, 4, 10, 12, 18, 26, 32, 40, 52, 60, 72, 206, 218, 352, 490, 744, 1002, 1382, 1760, 2380, 3004, 3864, 4728, 5954, 12218, 13804, 20554, 27660, 39930, 52682, 75632, 99184, 132940, 172332, 227088, 287606, 373562, 465280, 587602, 725880
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
FORMULA
| G.f.: Sum(prime(k)!*x^(1/2*prime(k)^2+1/2*prime(k))/Product(1-x^j, j = 1 .. prime(k)), k = 1 .. infinity).
|
|
|
MATHEMATICA
| CoefficientList[ Series[ Sum[ Prime[k]!* x^(Prime[k]^2/2 + Prime[k]/2)/Product[1 - x^j, {j, Prime[k]}], {k, 44}], {x, 0, 44}], x] (from Robert G. Wilson v Feb 04 2005)
|
|
|
CROSSREFS
| Cf. A085756, A052467, A038499.
Sequence in context: A199400 A056919 A052175 * A002082 A005304 A152732
Adjacent sequences: A102620 A102621 A102622 * A102624 A102625 A102626
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Vladeta Jovovic (vladeta(AT)eunet.rs), Jan 31 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 04 2005
|
| |
|
|
