%I #22 Jul 23 2021 02:08:28
%S 3,8,20,146139,584835,44814015,1436395095,9988999095,25997557299,
%T 193861767939,2105722150095,3921293253003,8234992646643
%N Numbers k such that s(k) = s(k-1) + s(k-2), where s(k) is the sum of proper divisors of k (A001065).
%C a(14) > 10^13. - _Giovanni Resta_, Feb 25 2020
%e s(146139) = 76581 = 75802 + 779 = s(146138) + s(146137), therefore 146139 is in the sequence.
%t s[n_]:=DivisorSigma[1,n]-n; Select[Range[10^6], s[#]==s[#-1]+s[#-2] &]
%Y Cf. A001065, A065557, A065900, A076136, A076251, A145469.
%K nonn,more
%O 1,1
%A _Amiram Eldar_, Aug 19 2017
%E a(7)-a(10) from _Giovanni Resta_, Aug 29 2017
%E a(11)-a(13) from _Giovanni Resta_, Feb 25 2020
|