login
This site is supported by donations to The OEIS Foundation.

 

Logo

Annual appeal: Please make a donation to keep the OEIS running! Over 6000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A179460 Numbers m for which 2*A179382(m)=A002326(m-1). 3
2, 3, 5, 6, 7, 9, 10, 13, 14, 15, 17, 19, 21, 22, 27, 29, 30, 31, 33, 34, 35, 39, 41, 42, 49, 50, 51, 54, 55, 57, 61, 63, 65, 66, 69, 70, 71, 73, 75, 79, 82, 85, 86, 87, 89, 90, 91, 93, 97, 99, 101, 102, 103, 104, 105, 106, 107, 114, 115, 121, 122, 125, 126, 129, 133, 135 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

m is in the sequence iff the set {1,2,...,2^(2*m-2)} considered in reduced residue system modulo 2*m-1 contains the same number of odd and even integers.

LINKS

Table of n, a(n) for n=1..66.

EXAMPLE

5 in the sequence since modulo 2*5-1=9 we have {1,2,4,8,16,32}={1,2,4,8,7,5} and the last set contains 3 odd and 3 even elements.

MATHEMATICA

fQ[n_] := Block[{r = Union@ PowerMod[2, Range[0, 2 n - 2], 2 n - 1]}, Length@ r == 2 Count[ OddQ@ r, True]]; Select[ Range@ 138, fQ] (* Robert G. Wilson v, Aug 26 2010 *)

CROSSREFS

Cf. A002326, A179382.

Sequence in context: A038161 A158746 A062470 * A171886 A018559 A057196

Adjacent sequences:  A179457 A179458 A179459 * A179461 A179462 A179463

KEYWORD

nonn

AUTHOR

Vladimir Shevelev, Jul 14 2010

EXTENSIONS

More terms from Robert G. Wilson v, Aug 26 2010

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified November 23 09:29 EST 2017. Contains 295115 sequences.