|
%I #21 Sep 08 2022 08:45:16
%S 87,195,244,495,11584,35595,137452847104
%N Numbers n whose deficiency is 54.
%C No more elements found up to 2*10^7. - _Stefan Steinerberger_, Feb 04 2006
%e 87 is a term of the sequence because 3*29 = 87 and 87 - 29 - 3 = g(87) = 55.
%t Do[ If[ DivisorSigma[1, n] + 54 == 2n, Print[n]], {n, 10^7}] (* _Robert G. Wilson v_, Dec 22 2004 *)
%o (Magma) [n: n in [1..2*10^7] | DivisorSigma(1,n)+54 eq 2*n]; // _Vincenzo Librandi_, Jul 30 2015
%Y Cf. A033879, A101223.
%K nonn,more
%O 1,1
%A Vassil K. Tintschev (tinchev(AT)sunhe.jinr.ru), Dec 17 2004
%E a(7) from _Donovan Johnson_, Dec 23 2008
|
