A206909 Position of 2n+cos(n) when the sets {2k+cos(k)} and {2k+sin(k)} are jointly ranked.

1, 3, 5, 8, 10, 12, 14, 15, 17, 19, 22, 24, 26, 27, 29, 31, 34, 36, 38, 39, 41, 43, 46, 48, 50, 51, 53, 55, 57, 60, 62, 64, 65, 67, 69, 72, 74, 76, 77, 79, 81, 84, 86, 88, 89, 91, 93, 96, 98, 100, 102, 103, 105, 107, 110, 112, 114, 115, 117, 119, 122, 124, 126

Offset

1,2

Links

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

Mathematica

f[n_] := N[2 n + Cos[n]];
g[n_] := N[2 n + Sin[n]]; z = 120;
c = Table[f[n], {n, 1, z}];
s = Table[g[n], {n, 1, z}];
j = Sort[Union[c, s]];
p[n_] := Position[j, f[n]];
q[n_] := Position[j, g[n]];
Flatten[Table[p[n], {n, 1, z}]] (* A206909 *)
Flatten[Table[q[n], {n, 1, z}]] (* A206910 *)

Crossrefs

Cf. A206910.

Sequence in context: A073608 A155945 A096985 * A138829 A003265 A360394

Adjacent sequences: A206906 A206907 A206908 * A206910 A206911 A206912

Keyword

nonn

Author

Clark Kimberling, Feb 13 2012

Status

approved