The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A332468 a(n) = Sum_{k=1..n} mu(k) * floor(n/k)^n. 4
 1, 3, 25, 239, 3091, 45863, 821227, 16711423, 387138661, 9990174303, 285262663291, 8913906888703, 302861978789371, 11111328334033327, 437889112287422401, 18446462446101903615, 827238009323454485641, 39346257879101283645743, 1978418304199236175597105 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Seiichi Manyama, Table of n, a(n) for n = 1..386 FORMULA a(n) ~ n^n. - Vaclav Kotesovec, May 28 2021 MATHEMATICA Table[Sum[MoebiusMu[k] Floor[n/k]^n, {k, 1, n}], {n, 1, 19}] b[n_, k_] := b[n, k] = n^k - Sum[b[Floor[n/j], k], {j, 2, n}]; a[n_] := b[n, n]; Table[a[n], {n, 1, 19}] PROG (PARI) a(n)={sum(k=1, n, moebius(k) * floor(n/k)^n)} \\ Andrew Howroyd, Feb 13 2020 (MAGMA) [&+[MoebiusMu(k)*Floor(n/k)^n:k in [1..n]]:n in [1..20]]; // Marius A. Burtea, Feb 13 2020 CROSSREFS Main diagonal of A344527. Cf. A008683, A018805, A071778, A082540, A082544, A332469, A343978. Sequence in context: A199679 A118726 A066221 * A134272 A335117 A171640 Adjacent sequences:  A332465 A332466 A332467 * A332469 A332470 A332471 KEYWORD nonn AUTHOR Ilya Gutkovskiy, Feb 13 2020 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 21 09:45 EDT 2021. Contains 345358 sequences. (Running on oeis4.)