%I #14 May 11 2018 14:44:06
%S -181,-179,-173,-163,-149,-131,-109,-83,-53,-19,19,61,107,157,211,269,
%T 331,397,467,541,619,701,787,877,971,1069,1171,1277,1619,1741,1867,
%U 1997,2131,2269,2411,2557,2707,2861,3019,3181,3347,3517,3691,4051,4621,5021
%N Primes of the form 2n^2 - 181 for n >= 0.
%C Here we allow primes to be negative.
%e 2*(40)^2 - 181 = 3019, which is prime.
%t Select[2*Range[0,60]^2-181,PrimeQ] (* _Harvey P. Dale_, May 11 2018 *)
%K sign
%O 1,1
%A _César Aguilera_, Nov 13 2012
|