OFFSET
1,1
COMMENTS
It appears that this is also the sequence of values of n for which the sum of terms of one period of the base-2 MR-expansion (see A136042) of 1/n equals (n-1)/2. An example appears in A155072 where one period of the base-2 MR-expansion of 1/17 is shown to be {5,1,1,1} with sum 8=(17-1)/2. - John W. Layman, Jan 19 2009
If p is a term of this sequence, then 2 is a quadratic residue module p, so p == 1, 7 (mod 8). - Jianing Song, Nov 01 2024
LINKS
Klaus Brockhaus, Table of n, a(n) for n=1..1000
MATHEMATICA
fQ[n_] := 1 + 2 MultiplicativeOrder[2, n] == n; Select[ Prime@ Range@ 174, fQ]
PROG
(Magma) [ p: p in PrimesUpTo(1031) | r eq 1 and Order(R!2) eq q where q, r is Quotrem(p, 2) where R is ResidueClassRing(p) ]; // Klaus Brockhaus, Dec 02 2008
(PARI) r=2; forprime(p=3, 1500, z=(p-1)/znorder(Mod(r, p)); if(z==2, print1(p, ", "))); \\ Joerg Arndt, Jan 12 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Don Reble, Mar 11 2006
STATUS
approved