%I #10 Jun 04 2023 13:02:42
%S 2,3,4,5,6,6,7,7,8,9,9,10,10,10,11,12,12,13,13,13,14,15,15,15,16,16,
%T 16,16,17,17,17,18,18,18,19,19,19,20,20,20,20,21,21,21,22,22,23,23,23,
%U 24,24,24,24,24,25,25,25,25,26,26,26,27,27,27,27,27,28,28,28,28,29,29,29
%N Integer part of the square root of the n-th prime of the form 4k+1.
%C a(n)^2 < A002330(n+2)^2 + A002331(n+2)^2 < a(n+1)^2.
%F a(n) = A000196(A002144(n)).
%t Floor[Sqrt[#]]&/@Select[Prime[Range[300]],Mod[#,4]==1&] (* _Harvey P. Dale_, Jun 04 2023 *)
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Mar 02 2003
|