cp's OEIS Frontend

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.

A347416 a(n) = Sum_{k=1..n} floor((n/k)^n).

This page as a plain text file.
%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