A348865 Numbers k such that A099378(k) | (A099377(k) - 1).
1, 2, 3, 6, 9, 14, 15, 24, 28, 30, 32, 42, 44, 55, 84, 91, 95, 120, 135, 140, 182, 198, 224, 234, 243, 261, 270, 308, 330, 351, 420, 444, 459, 477, 483, 492, 496, 546, 564, 570, 625, 630, 636, 672, 744, 756, 840, 852, 861, 924
Offset: 1
Keywords
Examples
2 is a term since the harmonic mean of divisors of 2 is 4/3 and 3 | (4-1).
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
h[n_] := DivisorSigma[0, n]/DivisorSigma[-1, n]; q[n_] := Divisible[Numerator[(h1 = h[n])] - 1, Denominator[h1]]; Select[Range[1000], q]
Comments