A212461 a(n) = ceiling(4n*log(4n)).

6, 17, 30, 45, 60, 77, 94, 111, 130, 148, 167, 186, 206, 226, 246, 267, 287, 308, 330, 351, 373, 395, 417, 439, 461, 484, 506, 529, 552, 575, 598, 622, 645, 669, 692, 716, 740, 764, 788, 813, 837, 861, 886, 911, 935

Offset

1,1

Links

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

Formula

a(n) = A050502(4*n). - Michel Marcus, Jan 11 2016

Mathematica

Table[Ceiling[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(CEILING(4·x·LOG(4·x)), y), x := x - 1))
(Magma) [Ceiling(4*n*Log(4*n)): n in [1..80]]; // Vincenzo Librandi, Feb 13 2013
(PARI) a(n) = ceil(4*n*log(4*n)); \\ Michel Marcus, Jan 11 2016

Crossrefs

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

Sequence in context: A017461 A061875 A063230 * A204059 A067559 A096426

Adjacent sequences: A212458 A212459 A212460 * A212462 A212463 A212464

Keyword

easy,nonn

Author

Mohammad K. Azarian, May 31 2012

Status

approved