login
A126227
Mersenne prime A000668(n+1) mod A000668(n).
1
1, 3, 3, 63, 15, 3, 4095, 1073741823, 268435455, 262143, 1048575, 8191, 77371252455336267181195263, 36893488147419103231
OFFSET
1,2
COMMENTS
The next term is too large to include.
LINKS
MATHEMATICA
a[n_] := Mod[2^MersennePrimeExponent[n+1]-1, 2^MersennePrimeExponent[n]-1]; Array[a, 10] (* Amiram Eldar, Oct 23 2024 *)
PROG
(PARI) mers(p) = 2^p-1;
lista() = {ve = [2, 3, 5, 7, 13, 17, 19, 31, 61, 89, 107, 127, 521, 607, 1279]; for (i=2, 15, print1(mers(ve[i]) % mers(ve[i-1]), ", "); ); } \\ Michel Marcus, Nov 02 2013
CROSSREFS
Sequence in context: A332786 A102065 A102074 * A333827 A213137 A260076
KEYWORD
nonn,changed
AUTHOR
Artur Jasinski, Dec 21 2006
EXTENSIONS
Definition corrected and a(14) from Michel Marcus, Nov 02 2013
STATUS
approved