The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #22 Feb 19 2024 10:28:08
%S 1,6,28,120,316,496,672,1272,1431,1484,1580,2212,2862,3768,4452,4740,
%T 5462,5724,6360,7155,7584,8128,11060,11448,12640,13356,14310,15800,
%U 16386,17696,18840,22896,28620,30240,32760,33180,35616,37920,38712
%N Numbers n such that n | sigma_13(n).
%C sigma_13(n) is the sum of the 13th powers of the divisors of n (A013961).
%H Amiram Eldar, <a href="/A055717/b055717.txt">Table of n, a(n) for n = 1..5000</a>
%t Do[If[Mod[DivisorSigma[13, n], n]==0, Print[n]], {n, 1, 50000}]
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Jun 09 2000