OFFSET
1,2
COMMENTS
a(14432) = 191913030 is probably the last term. Any further terms must be greater than 1.5 * 10^18. - Charles R Greathouse IV, Jun 30 2011
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..14432
MATHEMATICA
Select[Range[700], NextPrime[#-2Sqrt[Sqrt[#]]]>#&] (* Harvey P. Dale, Jul 27 2011 *)
PROG
(PARI) is(n)=for(k=0, sqrtnint(16*n-1, 4), if(isprime(n-k), return(0))); 1 \\ Charles R Greathouse IV, Aug 26 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jun 26 2011
EXTENSIONS
a(12)-a(13) added, a(53)-a(56) corrected by Charles R Greathouse IV, Jun 30 2011
STATUS
approved