A172267 a(n) = floor(n*(sqrt(7)-sqrt(5))).

0, 0, 0, 1, 1, 2, 2, 2, 3, 3, 4, 4, 4, 5, 5, 6, 6, 6, 7, 7, 8, 8, 9, 9, 9, 10, 10, 11, 11, 11, 12, 12, 13, 13, 13, 14, 14, 15, 15, 15, 16, 16, 17, 17, 18, 18, 18, 19, 19, 20, 20, 20, 21, 21, 22, 22, 22, 23, 23, 24, 24, 24, 25, 25, 26, 26, 27, 27, 27, 28, 28, 29, 29, 29, 30, 30, 31, 31

Offset

0,6

Links

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

Mathematica

With[{c = Sqrt[7] - Sqrt[5]}, Floor[c Range[0, 80]]] (* Vincenzo Librandi, Aug 01 2013 *)

Prog

(Magma) [Floor(n*(Sqrt(7)-Sqrt(5))): n in [0..80]]; // Vincenzo Librandi, Aug 01 2013

Crossrefs

Cf. A172264, A172266-A172270, A172272-A172278.

Sequence in context: A100719 A057354 A172476 * A231151 A097508 A244225

Adjacent sequences: A172264 A172265 A172266 * A172268 A172269 A172270

Keyword

nonn,easy

Author

Vincenzo Librandi, Jan 30 2010

Status

approved