login
A022545
Initial members of prime nonuplets (p, p+2, p+6, p+8, p+12, p+18, p+20, p+26, p+30).
34
11, 182403491, 226449521, 910935911, 1042090781, 1459270271, 2843348351, 6394117181, 6765896981, 8247812381, 8750853101, 11076719651, 12850665671, 17140322651, 22784826131, 24816950771, 33081664151
OFFSET
1,1
COMMENTS
All terms congruent to 11 (modulo 210). - Matt C. Anderson, May 27 2015
LINKS
Matt C. Anderson and Dana Jacobsen, Table of n, a(n) for n = 1..10000 [first 401 terms from Matt C. Anderson]
Tony Forbes and Norman Luhn, Prime k-tuplets
MATHEMATICA
Select[Prime[Range[250000000]], Union[PrimeQ[ # +{2, 6, 8, 12, 18, 20, 26, 30}]]=={True} &] (* Vincenzo Librandi, May 27 2015 *)
PROG
(Magma) [p: p in PrimesUpTo(250000000) | forall{p+r: r in [2, 6, 8, 12, 18, 20, 26, 30] | IsPrime(p+r)}]; // Vincenzo Librandi, May 27 2015
(Perl) use ntheory ":all"; say for sieve_prime_cluster(1, 1e11, 2, 6, 8, 12, 18, 20, 26, 30); # Dana Jacobsen, Sep 30 2015
(PARI) forprime(p=2, 10^30, if (isprime(p+2) && isprime(p+6) && isprime(p+8) && isprime(p+12) && isprime(p+18) && isprime(p+20) && isprime(p+26) && isprime(p+30), print1(p", "))) \\ Altug Alkan, Sep 30 2015
CROSSREFS
KEYWORD
nonn
EXTENSIONS
More terms from Matt C. Anderson
STATUS
approved