A172326 a(n) = floor(n*(sqrt(7) + sqrt(2))).

0, 4, 8, 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60, 64, 69, 73, 77, 81, 85, 89, 93, 97, 101, 105, 109, 113, 117, 121, 125, 129, 133, 138, 142, 146, 150, 154, 158, 162, 166, 170, 174, 178, 182, 186, 190, 194, 198, 202

Offset: 0

Author

Vincenzo Librandi, Feb 01 2010

Keywords

• nonn
• easy
• less

Comments

Also integer part of n*4.0599648734..., where the constant is the largest root of x^4 - 18*x^2 + 25.

Links

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

Crossrefs

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

Programs

Magma

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

Maple

a:=n->floor(n*(sqrt(7)+sqrt(2))): seq(a(n),n=0..60); # Muniru A Asiru, Sep 28 2018

Mathematica

With[{c = Sqrt[7] + Sqrt[2]}, Floor[c Range[0, 60]]]  (* Harvey P. Dale, Mar 23 2011 *)

PARI

vector(60, n, n--; floor(n*(sqrt(7)+sqrt(2)))) \\ G. C. Greubel, Sep 28 2018