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.

A258846 The pi-based arithmetic derivative of n^n.

This page as a plain text file.
%I A258846 #11 Mar 24 2017 13:47:08
%S A258846 0,0,4,54,1024,9375,326592,3294172,201326592,4649045868,110000000000,
%T A258846 1426558353055,178322008965120,1817250639553518,166680102383370240,
%U A258846 8319983917236328125,590295810358705651712,5790681833204357349239,1298431466484785739988992
%N A258846 The pi-based arithmetic derivative of n^n.
%H A258846 Alois P. Heinz, <a href="/A258846/b258846.txt">Table of n, a(n) for n = 0..380</a>
%F A258846 a(n) = A258851(A000312(n)).
%F A258846 a(n) = n^n * A258851(n).
%F A258846 a(n) = A258997(n,n).
%p A258846 with(numtheory):
%p A258846 a:= n-> n^(n+1)*add(i[2]*pi(i[1])/i[1], i=ifactors(n)[2]):
%p A258846 seq(a(n), n=0..20);
%t A258846 a[n_] := n^(n+1)*Sum[i[[2]]*PrimePi[i[[1]]]/i[[1]], {i, FactorInteger[n]}];
%t A258846 a[0] = 0; Table[a[n], {n, 0, 20}] (* _Jean-François Alcover_, Mar 24 2017, translated from Maple *)
%Y A258846 Cf. A000312, A000720, A258851.
%Y A258846 Main diagonal of A258997.
%K A258846 nonn
%O A258846 0,3
%A A258846 _Alois P. Heinz_, Jun 12 2015