A172331 Floor(n*(sqrt(13)+sqrt(7))).

0, 6, 12, 18, 25, 31, 37, 43, 50, 56, 62, 68, 75, 81, 87, 93, 100, 106, 112, 118, 125, 131, 137, 143, 150, 156, 162, 168, 175, 181, 187, 193, 200, 206, 212, 218, 225, 231, 237, 243, 250, 256, 262, 268, 275, 281, 287, 293, 300, 306, 312

Offset

0,2

Comments

Also integer part of n*6.2513025865..., where the constant is the largest root of x^4 -40*x^2 +36.

Links

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

Mathematica

With[{c = Sqrt[13] + Sqrt[7]}, Floor[c Range[0, 70]]] (* Vincenzo Librandi, Aug 01 2013 *)

Prog

(Magma) [Floor(n*(Sqrt(13)+Sqrt(7))): n in [0..60]];

Crossrefs

Cf. A110117, A172323-A172332, A172334, A172336-A172338.

Sequence in context: A033003 A108592 A108593 * A038130 A246295 A108587

Adjacent sequences: A172328 A172329 A172330 * A172332 A172333 A172334

Keyword

nonn,easy,less

Author

Vincenzo Librandi, Feb 01 2010

Status

approved