OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..2000
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
Vladimir Joseph Stephan Orlovsky, Jan 04 2009
STATUS
approved