OFFSET
1,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 1..10000
MATHEMATICA
a[n_] := DivisorSum[n, #^4 &, Mod[#, 4]==3 &]; Array[a, 30] (* Amiram Eldar, Dec 06 2018 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Dec 23 1999
STATUS
approved