

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

Bruno Berselli, Table of n, a(n) for n = 1..100


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

Sequence in context: A032184 A130683 A111976 * A209299 A091040 A029985
Adjacent sequences: A236769 A236770 A236771 * A236773 A236774 A236775


KEYWORD

nonn


AUTHOR

Bruno Berselli, Feb 07 2014


STATUS

approved



