A195177 a(n) = 3*n - floor(2*n*sqrt(2)).

0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 15, 15

Offset

0,7

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..10000

Formula

a(n) = 3*n - A022842(n). - R. J. Mathar, Jan 10 2013

Mathematica

With[{c=2*Sqrt[2]}, Table[3*n-Floor[c*n], {n, 0, 50}]] (* G. C. Greubel, Oct 31 2017 *)

Prog

(Magma) [3*n-Floor(2*n*(Sqrt(2))): n in [0..70]]; // Vincenzo Librandi, Sep 12 2011
(PARI) for(n=0, 50, print1(3*n - floor(2*n*sqrt(2)), ", ")) \\ G. C. Greubel, Oct 31 2017

Crossrefs

Sequence in context: A152467 A242602 A097992 * A147583 A054895 A194699

Adjacent sequences: A195174 A195175 A195176 * A195178 A195179 A195180

Keyword

nonn

Author

Clark Kimberling, Sep 10 2011

Status

approved