|
| |
|
|
A090258
|
|
Last term of prime quadruples.
|
|
3
| |
|
|
13, 19, 109, 199, 829, 1489, 1879, 2089, 3259, 3469, 5659, 9439, 13009, 15649, 15739, 16069, 18049, 18919, 19429, 21019, 22279, 25309, 31729, 34849, 43789, 51349, 55339, 62989, 67219, 69499, 72229, 77269, 79699, 81049, 82729, 88819, 97849
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| lst={}; Do[p0=Prime[n]; If[PrimeQ[p2=p0+2], If[PrimeQ[p6=p0+6], If[PrimeQ[p8=p0+8], AppendTo[lst, p8]]]], {n, 12^4}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Aug 22 2008]
|
|
|
PROG
| (PARI) quintpr(n) = { s=0; forprime(p=5, n, if(isprime(p+2) && isprime(p+6) && isprime(p+8), print1(p+8", "); ) ); print(); print(s+.0) }
|
|
|
CROSSREFS
| Equals A064974 - 1.
Sequence in context: A174343 A158332 A180531 * A153266 A166664 A147393
Adjacent sequences: A090255 A090256 A090257 * A090259 A090260 A090261
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Jan 24 2004
|
| |
|
|
