A062819 - OEIS

%I #15 Feb 08 2025 04:51:41

%S 6,34,502,8162,33550342,8589869586,137438691334,2305843008139960290,

%T 2658455991569831744654692615953842678,

%U 191561942608236107294793378084303638130997321581719586,13164036458569648337239753460458722910223472318386943117783728134

%N Inverse Moebius transform of perfect numbers, A000396.

%H Amiram Eldar, <a href="/A062819/b062819.txt">Table of n, a(n) for n = 1..15</a>

%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>.

%F a(n) = Sum_{d|n} A000396(d). - _Amiram Eldar_, Feb 08 2025

%t a[n_] := DivisorSum[n, PerfectNumber[#] &]; Array[a, 11] (* _Amiram Eldar_, Feb 08 2025 *)

%Y Cf. A000396.

%K nonn,changed

%O 1,1

%A _Labos Elemer_, Jul 20 2001

%E Offset corrected and a(11) added by _Amiram Eldar_, Feb 08 2025