OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..300
FORMULA
EXAMPLE
p=11 is in this sequence because 6^2-5^2=11 and 11*6-5=61.
4799 is in this sequence because 2400^2-2399^2=4799 and 4799*2400-2399=11515201.
MATHEMATICA
Select[Prime[Range[10000]], PrimeQ[(# - 1)/2] &&PrimeQ[ (#^2 + 1)/2] &] (* Vincenzo Librandi, Aug 21 2014 *)
PROG
(Magma) [p: p in PrimesUpTo(10^5) | IsPrime((p-1) div 2) and IsPrime((p^2+1) div 2)]; // Vincenzo Librandi Aug 21 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Mar 06 2010
EXTENSIONS
Missing terms inserted and sequence extended by R. J. Mathar, Mar 29 2010
STATUS
approved