OFFSET
1,2
FORMULA
{k: A000043(k) <> 3 (mod 4)}.
MATHEMATICA
Select[Range[48], Mod[MersennePrimeExponent[#], 4] != 3 &] (* Amiram Eldar, Oct 18 2024 *)
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Jorge Coveiro, Dec 27 2005
EXTENSIONS
Edited by Don Reble, Jan 25 2006
a(25)-a(29) from Amiram Eldar, Oct 18 2024
STATUS
approved