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 A348865 #12 Nov 02 2021 15:59:34 %S A348865 1,2,3,6,9,14,15,24,28,30,32,42,44,55,84,91,95,120,135,140,182,198, %T A348865 224,234,243,261,270,308,330,351,420,444,459,477,483,492,496,546,564, %U A348865 570,625,630,636,672,744,756,840,852,861,924 %N A348865 Numbers k such that A099378(k) | (A099377(k) - 1). %C A348865 A disjoint union of the harmonic numbers (A001599) and the numbers whose harmonic mean of divisors is of the form m + 1/k, where m and k are integers. %H A348865 Amiram Eldar, <a href="/A348865/b348865.txt">Table of n, a(n) for n = 1..10000</a> %e A348865 2 is a term since the harmonic mean of divisors of 2 is 4/3 and 3 | (4-1). %t A348865 h[n_] := DivisorSigma[0, n]/DivisorSigma[-1, n]; q[n_] := Divisible[Numerator[(h1 = h[n])] - 1, Denominator[h1]]; Select[Range[1000], q] %Y A348865 Cf. A001599, A099377, A099378, A348866. %K A348865 nonn %O A348865 1,2 %A A348865 _Amiram Eldar_, Nov 02 2021