A292646 Rank of e*n when all the numbers e*j and (e+1)*k, for j>=1, k>=1, are jointly ranked.

1, 3, 5, 6, 8, 10, 12, 13, 15, 17, 19, 20, 22, 24, 25, 27, 29, 31, 32, 34, 36, 38, 39, 41, 43, 45, 46, 48, 50, 51, 53, 55, 57, 58, 60, 62, 64, 65, 67, 69, 70, 72, 74, 76, 77, 79, 81, 83, 84, 86, 88, 90, 91, 93, 95, 96, 98, 100, 102, 103, 105, 107, 109, 110

Offset

1,2

Links

Clark Kimberling, Table of n, a(n) for n = 1..1000

Mathematica

z = 120; r = E; s = E+1;
Table[n + Floor[n*r/s], {n, 1, z}]  (* A292646 *)
Table[n + Floor[n*s/r], {n, 1, z}]  (* A292647 *)

Crossrefs

Cf. A292647 (complement).

Sequence in context: A000210 A329829 A182760 * A022838 A329841 A047329

Adjacent sequences: A292643 A292644 A292645 * A292647 A292648 A292649

Keyword

nonn,easy

Author

Clark Kimberling, Sep 26 2017

Status

approved