A112649 Numbers k such that the k-th Mersenne prime exponent is not a Gaussian prime (not 3 mod 4).
1, 3, 5, 6, 9, 10, 13, 17, 18, 19, 21, 22, 23, 24, 25, 26, 27, 30, 33, 35, 36, 37, 38, 39, 43, 44, 46, 47, 48
Offset: 1
Keywords
Programs
-
Mathematica
Select[Range[48], Mod[MersennePrimeExponent[#], 4] != 3 &] (* Amiram Eldar, Oct 18 2024 *)
Formula
{k: A000043(k) <> 3 (mod 4)}.
Extensions
Edited by Don Reble, Jan 25 2006
a(25)-a(29) from Amiram Eldar, Oct 18 2024