|
|
A212460
|
|
a(n) = ceiling(3n*log(3n)).
|
|
8
|
|
|
4, 11, 20, 30, 41, 53, 64, 77, 89, 103, 116, 130, 143, 157, 172, 186, 201, 216, 231, 246, 262, 277, 293, 308, 324, 340, 356, 373, 389, 405, 422, 439, 455, 472, 489, 506, 523, 540, 558, 575, 592, 610, 627, 645, 663, 680
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Table[Ceiling[3*n*Log[3*n]], {n, 80}] (* _Vincenzo Liobrandi_, Feb 13 2013 *)
|
|
PROG
|
(Derive) PROG(y := [], x := 100, LOOP(IF(x = 0, RETURN y), y := ADJOIN(CEILING(3·x·LOG(3·x)), y), x := x - 1))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|