A172274 a(n) = floor(n*(sqrt(13)-sqrt(11))).

0, 0, 0, 0, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 8, 8, 8, 8, 9, 9, 9, 10, 10, 10, 10, 11, 11, 11, 12, 12, 12, 13, 13, 13, 13, 14, 14, 14, 15, 15, 15, 15, 16, 16, 16, 17, 17, 17, 17, 18, 18, 18, 19, 19, 19, 19, 20, 20, 20, 21, 21, 21, 21, 22, 22, 22, 23

Offset: 0

Author

Vincenzo Librandi, Jan 30 2010

Keywords

• nonn
• easy

Links

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

Crossrefs

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

Programs

Magma

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

Mathematica

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

Formula

a(n) = floor(n*(A010470 - A010468)). - Rick L. Shepherd, Jun 17 2010

Extensions

Edited by Rick L. Shepherd, Jun 17 2010