|
Search: id:A122500
|
|
| |
|
| 25, 183922, 413269, 2086561, 268550439, 77664004259, 1286498670037058, 835992504648428541, 69918194872608910320341, 157104757807495406675035, 353011186440414668176111, 13139449230370726052061293111
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
semiPrimeQ[n_Integer] := Plus @@ Last /@ FactorInteger[n] == 2; s = CoefficientList[ Series[x/(x^3 - x^2 - 2*x + 1), {x, 0, 100}], x]; Select[s, SemiprimeQ@# &]
|
|
CROSSREFS
|
Cf. A006054, A006053.
Sequence in context: A076445 A013835 A068737 this_sequence A116197 A023924 A022066
Adjacent sequences: A122497 A122498 A122499 this_sequence A122501 A122502 A122503
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com) and Gary Adamson, Sep 15 2006
|
|
EXTENSIONS
|
Edited by njas, Serp 17 2006
More terms from Robert G. Wilson v Sep 18 2006
|
|
|
Search completed in 0.002 seconds
|
