A212457 a(n) = floor(4n*log(4n)).

5, 16, 29, 44, 59, 76, 93, 110, 129, 147, 166, 185, 205, 225, 245, 266, 286, 307, 329, 350, 372, 394, 416, 438, 460, 483, 505, 528, 551, 574, 597, 621, 644, 668, 691, 715, 739, 763, 787, 812, 836, 860, 885, 910, 934

Offset: 1

Author

Mohammad K. Azarian, May 31 2012

Keywords

• easy
• nonn

Links

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

Crossrefs

Cf. A050502, A050504, A212455, A212456, A212458, A212459, A212460, A212461, A212462.

Programs

Derive

PROG(y := [], x := 100, LOOP(IF(x = 0, RETURN y), y := ADJOIN(FLOOR(4·x·LOG(4·x)), y), x := x - 1))

Magma

[Floor(4*n*Log(4*n)): n in [1..80]]; // Vincenzo Librandi, Feb 13 2013

Mathematica

Table[Floor[4*n*Log[4*n]], {n, 80}] (* Vincenzo Librandi, Feb 13 2013 *)

PARI

a(n)=4*n*log(4*n)\1 \\ Charles R Greathouse IV, Sep 04 2015