This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A347416 #19 Sep 14 2021 02:23:44 %S A347416 1,5,31,276,3238,47463,830415,16845619,388198577,10009945747, %T A347416 285452668383,8918294580680,302912273410475,11112687415252836, %U A347416 437907284782655738,18447025981637731050,827246579683710818081,39346558272075085340201,1978423430905859200399397 %N A347416 a(n) = Sum_{k=1..n} floor((n/k)^n). %H A347416 Seiichi Manyama, <a href="/A347416/b347416.txt">Table of n, a(n) for n = 1..386</a> %F A347416 a(n) ~ n^n. - _Vaclav Kotesovec_, Sep 14 2021 %e A347416 a(3) = [(3/1)^3] + [(3/2)^3] + [(3/3)^3] = 27 + 3 + 1 = 31. %t A347416 a[n_] := Sum[Floor[(n/k)^n], {k, 1, n}]; Array[a, 20] (* _Amiram Eldar_, Aug 31 2021 *) %o A347416 (PARI) a(n) = sum(k=1, n, n^n\k^n); %Y A347416 Cf. A006218, A153818, A332469, A344675, A347415. %K A347416 nonn %O A347416 1,2 %A A347416 _Seiichi Manyama_, Aug 31 2021