A173903 Numbers k such that both (2^k+1)^2-2 and (2^k-1)^2-2 are prime.
2, 3, 12, 15, 18, 21, 27
Offset: 1
Programs
-
Magma
[n: n in [1..400] | IsPrime((2^n-1)^2-2) and IsPrime((2^n+1)^2-2)];
-
Mathematica
Select[Range[3000], PrimeQ[((2^# + 1)^2 - 2)]&&PrimeQ[((2^# - 1)^2 - 2)] &] (* Vincenzo Librandi, Aug 21 2014 *)
Formula
Extensions
Definition clarified by Jon E. Schoenfield, Jun 18 2010
Comments