|
|
A236772
|
|
a(n) = floor( Sum_{i=1..n} n^i/i ).
|
|
4
|
|
|
1, 4, 16, 97, 840, 9751, 141364, 2448224, 49213158, 1125229242, 28823071636, 817379051371, 25417591832210, 859893812841432, 31439503159778411, 1235301513693182001, 51906185332750116476, 2322562816174820224108, 110253678955674860565875
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
For n=5, floor(5 + 5^2/2 + 5^3/3 + 5^4/4 + 5^4) = floor(10085/12) = 840, therefore a(5) = 840.
|
|
MATHEMATICA
|
Table[Floor[Sum[n^i/i, {i, n}]], {n, 20}]
|
|
PROG
|
(Magma) [Floor(&+[n^i/i: i in [1..n]]): n in [1..20]];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|