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

 

Logo


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: A066937 A217266 A209637 * 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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 15 17:24 EDT 2019. Contains 328037 sequences. (Running on oeis4.)