A292645 Rank of (6+r)*n when all the numbers (6-r)*j and (6+r)*k, where r = sqrt(2), j>=1, k>=1, are jointly ranked.

2, 5, 7, 10, 13, 15, 18, 20, 23, 26, 28, 31, 34, 36, 39, 41, 44, 47, 49, 52, 54, 57, 60, 62, 65, 68, 70, 73, 75, 78, 81, 83, 86, 88, 91, 94, 96, 99, 102, 104, 107, 109, 112, 115, 117, 120, 122, 125, 128, 130, 133, 136, 138, 141, 143, 146, 149, 151, 154, 157

Offset

1,1

Links

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

Mathematica

z = 120; r = 6 - Sqrt[2]; s = 6 + Sqrt[2];
Table[n + Floor[n*r/s], {n, 1, z}]  (* A292644 *)
Table[n + Floor[n*s/r], {n, 1, z}]  (* A292645 *)

Prog

(PARI) vector(100, n, n+floor(n*(6+sqrt(2))/(6-sqrt(2)))) \\ G. C. Greubel, Aug 20 2018
(Magma) [n+Floor(n*(6+Sqrt(2))/(6-Sqrt(2))): n in [1..100]]; // G. C. Greubel, Aug 20 2018

Crossrefs

Cf. A292644 (complement).

Sequence in context: A331833 A018717 A188036 * A001950 A090909 A330064

Adjacent sequences: A292642 A292643 A292644 * A292646 A292647 A292648

Keyword

nonn,easy

Author

Clark Kimberling, Sep 26 2017

Status

approved