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.

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

This page as a plain text file.
%I A347415 #23 Sep 14 2021 02:20:13
%S A347415 1,3,6,11,18,31,48,76,118,184,279,426,641,966,1448,2163,3228,4805,
%T A347415 7137,10586,15681,23198,34278,50606,74632,109987,161954,238312,350432,
%U A347415 514999,756407,1110391,1629219,2389346,3502578,5132354,7517523,11007078,16110784,23573102,34480937,50420909
%N A347415 a(n) = Sum_{k=1..n} floor((n/k)^k).
%H A347415 Seiichi Manyama, <a href="/A347415/b347415.txt">Table of n, a(n) for n = 1..5000</a>
%F A347415 a(n) ~ sqrt(2*Pi*n) * exp(exp(-1)*n - 1/2). - _Vaclav Kotesovec_, Sep 14 2021
%e A347415 a(3) = [3/1] + [(3/2)^2] + [(3/3)^3] = 3 + 2 + 1 = 6.
%t A347415 a[n_] := Sum[Floor[(n/k)^k], {k, 1, n}]; Array[a, 40] (* _Amiram Eldar_, Aug 31 2021 *)
%o A347415 (PARI) a(n) = sum(k=1, n, n^k\k^k);
%Y A347415 Cf. A006218, A062071, A153818, A344675, A345176, A347416.
%K A347415 nonn
%O A347415 1,2
%A A347415 _Seiichi Manyama_, Aug 31 2021