|
Search: id:A058357
|
|
|
| A058357 |
|
Coefficients in the series (1 + x - 4x^4 - 6x^6 - 8x^8 - 9x^9 - 10x^10 - 12x^12 - 14x^14 - ... )/(1 - 2x^2 - 3x^3 - 5x^5 - 7x^7 - 11x^11 - 13x^13 - ... ). |
|
+0
1
|
|
| 1, 1, 2, 5, 3, 21, 20, 68, 127, 216, 588, 945, 2310, 4464, 9065, 19731, 38039, 82599, 165226, 342520, 711496, 1442555, 3015297, 6145475, 12711995, 26183208, 53750956, 111108083, 228062512, 470499012, 968320551, 1993099704
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
MATHEMATICA
|
CoefficientList[ Series[ (1 + x - Apply[ Plus, Select[ Range[ 2, 50 ], !PrimeQ[ # ] & ]*x^Select[ Range[ 2, 50 ], !PrimeQ[ # ] & ] ] ) / (1 - Apply[ Plus, Select[ Range[ 2, 50 ], PrimeQ[ # ] & ]*x^Select[ Range[ 2, 50 ], PrimeQ[ # ] & ] ] ), {x, 0, 50} ], x ]
|
|
CROSSREFS
|
Sequence in context: A109619 A087228 A077216 this_sequence A097754 A122992 A051497
Adjacent sequences: A058354 A058355 A058356 this_sequence A058358 A058359 A058360
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 16 2000
|
|
|
Search completed in 0.002 seconds
|
