OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..2000
MATHEMATICA
Select[Range[2*10^4], PrimeQ[#] && Length[ContinuedFraction[(1+Sqrt[#])/2][[2]]] == 17 &] (* Amiram Eldar, Mar 30 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Oct 30 2008
EXTENSIONS
Period length in definition corrected, 2579, 5003 removed, 5813 inserted by R. J. Mathar, Sep 06 2009
More terms from Amiram Eldar, Mar 30 2020
STATUS
approved