OFFSET
1,1
COMMENTS
The exponents of the Mersenne primes (A000043) are contained in this sequence.
Needed factorizations are in the Cunningham Project.
Also in the sequence are 1279, 2203, 2281, 2909, 3217, 4253. - Amiram Eldar, Feb 18 2019
LINKS
S. S. Wagstaff, Jr., The Cunningham Project.
FORMULA
A183077(n) = 2^a(n) - 1.
EXAMPLE
43 is in this sequence because 2^43 - 1 = 431 * 9719 * 2099863, and each of those primes has the form 4j + 3.
MATHEMATICA
Select[Prime[Range[30]], And@@(IntegerQ[(#-3)/4]&/@Transpose[ FactorInteger[ 2^#-1]][[1]])&] (* Increase the value of Range to increase the number of terms generated, but processing times grow very quickly as the value increases. *)(* Harvey P. Dale, Jan 01 2013 *)
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Stuart Clary, Dec 23 2010
EXTENSIONS
a(26) from Amiram Eldar, Feb 18 2019
STATUS
approved