login
Primes p such that continued fraction of (1 + sqrt(p))/2 has period 8; primes in A146333.
3

%I #14 Mar 30 2020 05:53:45

%S 31,71,383,503,743,983,1327,2543,4271,5711,6151,8543,9871,14503,17783,

%T 21191,22031,25463,35023,35759,36263,36559,40543,46471,47711,60727,

%U 66343,72551,73751,75767,81551,83639,91463,98327,142183,159407,160343,193031,195743,218623

%N Primes p such that continued fraction of (1 + sqrt(p))/2 has period 8; primes in A146333.

%H Amiram Eldar, <a href="/A146353/b146353.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Prime[Range[10000]], 8 == Length[ContinuedFraction[(1 + Sqrt[#])/2][[2]]] &]

%Y Cf. A000290, A050950-A050969, A078370, A146326-A146345, A146348-A146360.

%K nonn

%O 1,1

%A _Artur Jasinski_, Oct 30 2008

%E 8467 removed - _R. J. Mathar_, Sep 06 2009

%E Extended by _T. D. Noe_, Mar 22 2011

%E More terms from _Amiram Eldar_, Mar 30 2020