OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
a(6) = floor[(1+1/2+1/3+1/4+1/5+1/6)^6] = floor[2.45^6] = floor(216.270112515625...) = 216.
MAPLE
MATHEMATICA
Table[ Floor[ Sum[1/i, {i, 1, n} ]^n], {n, 1, 30} ]
With[{nn=30}, Floor[#[[1]]^#[[2]]]&/@Thread[{Accumulate[1/Range[nn]], Range[nn]}]] (* Harvey P. Dale, Feb 16 2013 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Amarnath Murthy, Jan 02 2002
EXTENSIONS
More terms from Robert G. Wilson v, Jan 04 2002
STATUS
approved