|
|
A178458
|
|
Abundant numbers of the form k^2 + 1.
|
|
1
|
|
|
2210, 3250, 24650, 94250, 117650, 199810, 214370, 310250, 351650, 485810, 499850, 700570, 727610, 744770, 915850, 986050, 1306450, 1545050, 1814410, 1841450, 1885130, 2582450, 2699450, 3052010, 3583450, 4028050, 4678570, 5094050, 5257850, 6466850, 7059650, 7144930
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
2210 = 2*5*13*17, sigma(2210) = 4536 > 2*2210 and 47^2 + 1 = 2210.
|
|
MATHEMATICA
|
Select[Range[3000]^2 + 1, DivisorSigma[1, #] > 2# &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|