The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A120750 (u(1), v(1), u(2), v(2), u(3), v(3),...), where u = A120243 and v = A120749. 4
 1, 2, 3, 4, 5, 7, 6, 9, 8, 11, 10, 12, 13, 14, 15, 16, 17, 19, 18, 21, 20, 23, 22, 24, 25, 26, 27, 28, 29, 31, 30, 33, 32, 36, 34, 38, 35, 40, 37, 41, 39, 43, 42, 45, 44, 48, 46, 50, 47, 52, 49, 53, 51, 55, 54, 57, 56, 60, 58, 62, 59, 64, 61, 65, 63, 67, 66, 69, 68, 70, 71, 72 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS A permutation of the positive integers. LINKS Clark Kimberling, Table of n, a(n) for n = 1..2000 MATHEMATICA z = 400; r = Sqrt[2]; f[n_] := f[n] = If[FractionalPart[n*r] < 1/2, 0, 1] u = Flatten[Position[Table[f[n], {n, 1, z}], 0]] (* A120243 *) v = Flatten[Position[Table[f[n], {n, 1, z}], 1]] (* A120749 *) Riffle[Take[u, z/4], Take[v, z/4]] (* A120750 *) CROSSREFS Cf. A120243, A120749, A120751. Sequence in context: A347539 A209637 A347540 * A265672 A178528 A183084 Adjacent sequences: A120747 A120748 A120749 * A120751 A120752 A120753 KEYWORD nonn AUTHOR Clark Kimberling, Jul 01 2006 EXTENSIONS Updated by Clark Kimberling, Sep 16 2014 STATUS approved

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

Last modified December 1 14:09 EST 2023. Contains 367476 sequences. (Running on oeis4.)