|
| |
|
|
A112666
|
|
Semiprimes n such that 3*n + 4 is a square.
|
|
0
| |
|
|
4, 15, 39, 55, 95, 119, 319, 407, 559, 799, 1007, 1159, 1679, 2407, 2759, 3007, 3959, 5207, 6439, 8639, 10207, 10679, 10919, 13199, 16279, 18407, 19039, 23407, 24119, 31007, 32239, 33919, 36079, 50959, 52007, 58519, 66007, 67799, 69007, 73319
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| fQ[n_] := Plus @@ Last /@ FactorInteger@n == 2 && IntegerQ@Sqrt[3n + 4]; Select[ Range@100000, fQ[ # ] &] (* Robert G. Wilson v *)
Select[Range[75000], PrimeOmega[#]==2&&IntegerQ[Sqrt[3#+4]]&] (* From Harvey P. Dale, Sep 22 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A106199 A113289 A033813 * A014629 A062486 A193226
Adjacent sequences: A112663 A112664 A112665 * A112667 A112668 A112669
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Dec 29 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Dec 30 2005
|
| |
|
|