|
%I #12 Oct 13 2019 09:43:41
%S 3,5,7,11,13,19,23,25,29,31,37,41,47,55,65,67,73,77,79,91,97,101,103,
%T 109,119,143,151,155,157,161,187,197,205,209,211,221,227,233,235,239,
%U 245,253,257,263,265,275,287,289,293,299,305,307,323,331,337,349,353
%N Square root of squares of form 2*p + 3, where p is prime.
%C Numbers n such that (n^2-3)/2 is prime. - _Robert Israel_, Jan 22 2018
%H Robert Israel, <a href="/A109358/b109358.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = SQRT(A109367(n)).
%p select(t -> isprime((t^2-3)/2), [seq(n,n=1..1000,2)]); # _Robert Israel_, Jan 22 2018
%t Select[Table[(2Prime[n] + 3)^(1/2), {n, 7000}], IntegerQ] (* _Ray Chandler_, Aug 25 2005 *)
%Y Cf. A098828, A109367.
%K nonn
%O 1,1
%A _Giovanni Teofilatto_, Aug 22 2005
%E Extended by _Ray Chandler_, Aug 25 2005
|
