OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
PROG
(PARI) a137576(n)=my(t); sumdiv(2*n+1, d, eulerphi(d)/(t=znorder(Mod(2, d))))*t-t+1;
lista(nn) = {forcomposite(n=1, nn, if ((n % 2) && (a137576((n-1)/2) == n), print1(znorder(Mod(2, n)), ", "); ); ); } \\ Michel Marcus, Feb 09 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, Jul 05 2008, Jul 12 2008, Jul 23 2008
EXTENSIONS
More terms from Michel Marcus, Feb 09 2015
STATUS
approved