OFFSET
1,1
MAPLE
a := proc (n) if nextprime((1/2)*n*(n+1)) = 10+(1/2)*n*(n+1) then (1/2)*n*(n+1) else end if end proc: seq(a(n), n = 1 .. 700); # Emeric Deutsch, Jun 20 2007
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, May 29 2007
EXTENSIONS
More terms from Emeric Deutsch, Jun 20 2007
STATUS
approved