[go: up one dir, main page]

login
Search: a219732 -id:a219732
     Sort: relevance | references | number | modified | created      Format: long | short | data
a(n) = (Product_{d=1..n-1} (2^d-1)) mod (2^n-1).
+10
1
0, 1, 3, 6, 5, 0, 7, 60, 301, 837, 11, 2835, 13, 11811, 13454, 2040, 17, 179361, 19, 639375, 1082802, 2818719, 23, 12878775, 28142451, 44845725, 131853841, 161290635, 29, 911545173, 31, 1048560, 4862374202, 11455474329, 26924001270, 62380858995, 37
OFFSET
1,3
COMMENTS
E. Vantieghem proved that a(n) = n if and only if n is an odd prime (see link).
LINKS
E. Vantieghem, On a congruence only holding for primes, Indagationes Mathematicae, Volume 2, Issue 2, 17 June 1991, pp. 253-255.
MAPLE
a:= proc(n) local d, m, r; r, m:= 1, 2^n-1;
for d to n-1 do r:= irem(r*(2^d-1), m) od;
irem(r, m)
end:
seq(a(n), n=0..40); # Alois P. Heinz, Apr 17 2013
MATHEMATICA
Table[Mod[Product[2^d-1, {d, 1, n-1}], 2^n-1], {n, 1, 37}] (* Geoffrey Critzer, Sep 28 2013 *)
PROG
(PARI) a(n) = prod(d=1, n-1, 2^d-1) % (2^n-1) \\ Michel Marcus, Apr 17 2013
CROSSREFS
Cf. A219732.
KEYWORD
nonn
AUTHOR
Michel Marcus, Apr 17 2013
STATUS
approved

Search completed in 0.005 seconds