This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A069166 #22 Feb 19 2021 04:24:54
%S A069166 1,6,14,40,120,244,280,440,494,680,920,1220,2040,2840,2968,3480,6360,
%T A069166 9880,10680,16376,20618,25160,32280,34720,40136,40280,42136,45560,
%U A069166 45994,46280,85880,91160,120408,200680,213280,231080,242840,377080,410552,412360,421480,441496,447320
%N A069166 Numbers k such that k*Sum_{d|k} 1/sigma(d) is an integer.
%H A069166 Amiram Eldar, <a href="/A069166/b069166.txt">Table of n, a(n) for n = 1..300</a>
%t A069166 Select[Range[125000],IntegerQ[# Total[1/DivisorSigma[1,Divisors[#]]]]&] (* _Harvey P. Dale_, Nov 03 2017 *)
%o A069166 (PARI) isok(k) = denominator(k*sumdiv(k, d, 1/sigma(d))) == 1; \\ _Michel Marcus_, Feb 15 2021
%Y A069166 Cf. A069164.
%K A069166 easy,nonn
%O A069166 1,2
%A A069166 _Benoit Cloitre_, Apr 09 2002
%E A069166 More terms from _Michel Marcus_, Feb 15 2021