OFFSET
1,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
EXAMPLE
7=3+4, 19=15+4, 59=55+4, 109=105+4, 157=153+4, 257=253+4, ...
MATHEMATICA
Select[Accumulate[Range[500]]+4, PrimeQ] (* Harvey P. Dale, Apr 23 2011 *)
PROG
(PARI) for(n=1, 500, if(isprime(k=n*(n+1)/2 + 4), print1(k, ", "))) \\ G. C. Greubel, Jul 03 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Apr 03 2009
EXTENSIONS
Edited by N. J. A. Sloane, Apr 06 2009
STATUS
approved