OFFSET
1,1
COMMENTS
A subsequence of A077816.
Odd numbers n > 1 such that A237292((n-1)/2) = 1.
Indices k such that A077816(k) is not in this sequence are 2, 13, 14, 16, 22, 24, 25, 27, 28, 30, ... - Altug Alkan, Dec 11 2015
There are no other terms, unless there are other Wieferich primes (A001220) besides 1093 and 3511. - Max Alekseyev, Dec 11 2015
MATHEMATICA
Select[Range[10^6], Mod[2^MultiplicativeOrder[2, 2 ((# - 1)/2) + 1], #^2] == 1 &] (* Michael De Vlieger, Dec 11 2015 *)
PROG
(PARI) a002326(n) = znorder(Mod(2, 2*n+1));
a237292(n) = a002326(2*n*(n+1))/a002326(n);
for(n=1, 1e8, if(a237292(n)==1, print1(2*n+1, ", "))) \\ Altug Alkan, Dec 11 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Thomas Ordowski, Dec 11 2015
EXTENSIONS
More terms from Altug Alkan, Dec 11 2015
Missing terms a(28)-a(30) and further terms a(34)-a(43) added by Max Alekseyev, Dec 11 2015
STATUS
approved