OFFSET
1,2
COMMENTS
No further at least up to 10^7.
No other terms up to 10^8. - Michel Marcus, Jan 17 2014
a(15) > 2.5*10^8. - Giovanni Resta, Apr 14 2017
EXAMPLE
The divisors of 43^2 + 1 are {1, 2, 5, 10, 25, 37, 50, 74, 185, 370, 925, 1850} and 1+2+5+10 + 25 = 43, hence 43 is in the list.
MATHEMATICA
Select[Range[10000000], MemberQ[Accumulate[Divisors[#^2+1]], #]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Aug 29 2011
EXTENSIONS
a(12)-a(13) from Michel Marcus, Jan 17 2014
a(14) from Giovanni Resta, Apr 14 2017
STATUS
approved