The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #8 May 23 2023 15:40:01
%S 1,2,6,8,27,30,42,60,130,611,837,1196,7524,10640,14160,16836,43268,
%T 59856,83121,90960,317424,688704,718643,769101,4714800,11339016,
%U 15819208,25553726,37282080,53056400,97012042,190740298,403501008,2047926288
%N Numbers n such that n | Sigma_2(n) + Sigma_1(n) + Sigma_0(n).
%C sigma_0(n) is the number of divisors of n (A000005).
%C sigma_1(n) is the sum of the divisors of n [same as sigma(n)] (A000203).
%C sigma_2(n) is the sum of the squares of the divisors of n (A001157).
%t Do[ If[ Mod[ DivisorSigma[ 2, n] + DivisorSigma[ 1, n] + DivisorSigma[ 0, n], n] == 0, Print[n]], {n, 1, 10^7}]
%t With[{c=Total[Table[DivisorSigma[x,#],{x,0,2}]]},Select[Range[800000],Mod[c,#]==0&]] (* _Harvey P. Dale_, May 23 2023 *)
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Nov 10 2000
%E a(26)-a(34) from _Donovan Johnson_, Jun 08 2011