OFFSET
1,1
COMMENTS
LINKS
Christian N. K. Anderson, Table of n, a(n) for n = 1..10000
EXAMPLE
457 is in the sequence because it is a prime number, and 457 = 13^2 + 17^2 - 1.
MATHEMATICA
mx = 25; Union[Select[Flatten[Table[Prime[a]^2 + Prime[b]^2 - 1, {a, mx}, {b, a, mx}]], # < Prime[mx]^2 && PrimeQ[#] &]] (* T. D. Noe, Mar 29 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Kevin L. Schwartz and Christian N. K. Anderson, Mar 21 2013
STATUS
approved