login
A212457
a(n) = floor(4n*log(4n)).
8
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,1
LINKS
MATHEMATICA
Table[Floor[4*n*Log[4*n]], {n, 80}] (* Vincenzo Librandi, Feb 13 2013 *)
PROG
(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
(PARI) a(n)=4*n*log(4*n)\1 \\ Charles R Greathouse IV, Sep 04 2015
KEYWORD
easy,nonn
AUTHOR
Mohammad K. Azarian, May 31 2012
STATUS
approved