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 A069096 #19 Feb 19 2021 04:25:16 %S A069096 900,3600,8100,14400,17424,22500,32400,57600,69696,72900,90000,108900, %T A069096 129600,166464,202500,230400,260100,278784,291600,345744,360000, %U A069096 374544,435600,476100,518400,562500,656100,665856,685584,756900,810000,921600 %N A069096 Numbers k such that the numerator of Sum_{d|k} 1/d > 3*k. %H A069096 Amiram Eldar, <a href="/A069096/b069096.txt">Table of n, a(n) for n = 1..4000</a> %t A069096 Select[Range[10^6], Numerator @ DivisorSigma[-1, #] > 3*# &] (* _Amiram Eldar_, Feb 19 2021 *) %o A069096 (PARI) isok(k) = numerator(sumdiv(k, d, 1/d)) > 3*k; \\ _Michel Marcus_, Feb 15 2021 %Y A069096 Cf. A017665, A069057. %K A069096 easy,nonn %O A069096 1,1 %A A069096 _Benoit Cloitre_, Apr 07 2002