A283369 a(n) = Sum_{d|n} d^(4*d + 1).
1, 513, 1594324, 17179869697, 476837158203126, 28430288029931296212, 3219905755813179726837608, 633825300114114700765531472385, 202755595904452569706561330874548093, 100000000000000000000000000476837158203638
Offset: 1
Keywords
Examples
a(6) = 1^(4+1) + 2^(8+1) + 3^(12+1) + 6^(24+1) = 28430288029931296212.
Links
- Seiichi Manyama, Table of n, a(n) for n = 1..119
Crossrefs
Programs
-
Mathematica
Table[Sum[d^(4*d + 1), {d, Divisors[n]}], {n, 20}] (* Indranil Ghosh, Mar 17 2017 *)
-
PARI
for(n=1, 20, print1(sumdiv(n, d, d^(4*d + 1)),", ")) \\ Indranil Ghosh, Mar 17 2017