OFFSET
1,2
COMMENTS
The next term is too large to include.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..22
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
KEYWORD
nonn,changed
AUTHOR
Artur Jasinski, Dec 21 2006
EXTENSIONS
Definition corrected and a(14) from Michel Marcus, Nov 02 2013
STATUS
approved