A231918 Primes p such that (2*p + 1)*(8*p + 1)*(18*p + 1) divides 2^p - 1.

50411, 116411, 495611, 705119, 730451, 816839, 1074851, 1851851, 2263619, 2827679, 3355991, 3979511, 4513979, 5108639, 5347211, 5654651, 6098759, 6673391, 7153199, 7862579, 8497451, 8754131, 10763939, 10852739, 11649611, 12523499, 12561551, 12694991

Offset

1,1

Links

Table of n, a(n) for n=1..28.

Chris Caldwell, The Prime Glossary, Mersenne number

C. K. Caldwell, "Top Twenty" page, Mersenne cofactor

Mathematica

lst = {}; Do[If[PrimeQ[p] && PowerMod[2, p, 288*p^3 + 196*p^2 + 28*p + 1] == 1, AppendTo[lst, p]], {p, 12694991}]; lst

Crossrefs

Subsequence of A231916.

Cf. A001348, A231917.

Sequence in context: A251466 A267252 A166760 * A029823 A302902 A317285

Adjacent sequences: A231915 A231916 A231917 * A231919 A231920 A231921

Keyword

nonn,less

Author

Arkadiusz Wesolowski, Nov 15 2013

Status

approved