|
| |
| |
|
|
|
25, 183922, 413269, 2086561, 268550439, 77664004259, 1286498670037058, 835992504648428541, 69918194872608910320341, 157104757807495406675035, 353011186440414668176111, 13139449230370726052061293111
(list; graph; refs; listen; history; internal format)
|
|
|
|
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: A013835 A068737 A151649 * A196520 A191559 A116197
Adjacent sequences: A122497 A122498 A122499 * A122501 A122502 A122503
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger Bagula (rlbagulatftn(AT)yahoo.com) and Gary Adamson, Sep 15 2006
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), Serp 17 2006
More terms from Robert G. Wilson v Sep 18 2006
|
| |
|
|
