|
|
A193433
|
|
Sum of the divisors of n^2+1.
|
|
11
|
|
|
1, 3, 6, 18, 18, 42, 38, 93, 84, 126, 102, 186, 180, 324, 198, 342, 258, 540, 434, 546, 402, 756, 588, 972, 578, 942, 678, 1332, 948, 1266, 972, 1596, 1302, 1980, 1260, 1842, 1298, 2484, 1842, 2286, 1602, 2613, 2124, 3534, 2100, 3042, 2220, 4536, 2772, 3606
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(7) = 93 because 7^2+1 = 50 and the sum of the 6 divisors { 1, 2, 5, 10, 25, 50} is 93.
|
|
MAPLE
|
with(numtheory):for n from 0 to 110 do:x:=divisors(n^2+1):n1:=nops(x):s:=0:for m from 1 to n1 do: s:=s+x[m]:od: printf(`%d, `, s):od:
|
|
MATHEMATICA
|
Table[Total[Divisors[n^2 + 1]], {n, 0, 100}] (* T. D. Noe, Jul 28 2011 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|