|
%I #10 Jul 02 2019 16:04:56
%S 5,7,11,17,19,25,29,37,43,47,53,55,61,71,73,79,89,97,101,107,109,115,
%T 127,143,155,169,173,187,191,199,215,223,235,241,251,253,263,271,281,
%U 295,317,323,341,367,377,389,395,397,403,415,425,433,439,443,449,457
%N Numbers n such that (n^2-7)/6 is prime.
%C All terms must be odd numbers. - _Harvey P. Dale_, Jul 02 2019
%H Harvey P. Dale, <a href="/A110016/b110016.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = SQRT(A110015(n)).
%t Select[Range[1,500,2],PrimeQ[(#^2-7)/6]&] (* _Harvey P. Dale_, Jul 02 2019 *)
%o (PARI) is(n)=isprime((n^2-7)/6) \\ _Charles R Greathouse IV_, Feb 20 2017
%Y Cf. A110014, A110015.
%K easy,nonn
%O 1,1
%A _Giovanni Teofilatto_, Sep 03 2005
%E Corrected and extended by _Ray Chandler_, Sep 04 2005
|
