%I #15 Nov 09 2023 08:53:21
%S 11,28,36,52,48,60,52,148,76,68,51,52,29,92,156,92,29,179,166,100,44,
%T 102,239,156,50,25,51,364,224,204,244,166,66,346,194,388,618,92,388,
%U 102,660,371,388,29,772,828,239,460,55,292,431,166,882,1060,532,155,68
%N Multiplicative order of 2 mod A141232(n).
%H Amiram Eldar, <a href="/A122929/b122929.txt">Table of n, a(n) for n = 1..10000</a>
%o (PARI) a137576(n)=my(t); sumdiv(2*n+1, d, eulerphi(d)/(t=znorder(Mod(2, d))))*t-t+1;
%o lista(nn) = {forcomposite(n=1, nn, if ((n % 2) && (a137576((n-1)/2) == n), print1(znorder(Mod(2, n)), ", ");););} \\ _Michel Marcus_, Feb 09 2015
%Y Cf. A141232, A002326, A001262, A141216.
%K nonn
%O 1,1
%A _Vladimir Shevelev_, Jul 05 2008, Jul 12 2008, Jul 23 2008
%E More terms from _Michel Marcus_, Feb 09 2015
|