login
A154114
Primes p such that p + 9699690 is also prime, 9699690 = 2*3*5*7*11*13*17*19.
4
23, 37, 41, 43, 59, 73, 79, 83, 109, 113, 127, 137, 151, 163, 197, 199, 223, 227, 229, 233, 239, 251, 263, 269, 283, 313, 337, 349, 373, 383, 389, 409, 421, 449, 457, 463, 479, 523, 557, 599, 617, 647, 691, 727, 739, 743, 751, 757, 761, 773, 797, 811, 821
OFFSET
1,1
LINKS
FORMULA
a(n) >> n log^2 n. - Charles R Greathouse IV, Sep 02 2016
MATHEMATICA
lst={}; Do[p=Prime[n]; If[PrimeQ[p+9699690], AppendTo[lst, p]], {n, 6!}]; lst
Select[Prime[Range[200]], PrimeQ[#+9699690]&] (* Harvey P. Dale, Apr 26 2011 *)
PROG
(Magma) [p: p in PrimesUpTo(1000) | IsPrime(p+9699690)]; // Vincenzo Librandi, Sep 02 2016
(PARI) is(n)=isprime(n+9699690) && isprime(n) \\ Charles R Greathouse IV, Sep 02 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved