OFFSET
1,1
LINKS
Robert Price, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 1 + A000203(n)^4.
MAPLE
with(numtheory): A259308:=n->1+sigma(n)^4: seq(A259308(n), n=1..50); # Wesley Ivan Hurt, Jul 09 2015
MATHEMATICA
Table[1 + DivisorSigma[1, n]^4, {n, 10000}]
Table[Cyclotomic[8, DivisorSigma[1, n]], {n, 10000}]
PROG
(Magma) [(1 + SumOfDivisors(n)^4): n in [1..50]]; // Vincenzo Librandi, Jun 24 2015
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Robert Price, Jun 24 2015
STATUS
approved