主帖好难!!!还是做点容易的——前面2串在OEIS有。后面的就没有了。
Table[Length@Solve[{((a + k)/a) ((b + k)/b) == (n + k)/n, (n + k + 1) n ≥ a ≥ b > 0}, {b, a}, Integers], {k, 9}, {n, 49}]
{1, 2, 3, 3, 4, 4, 4, 6, 6, 4, 6, 6, 4, 8, 10, 5, 6, 6, 6, 12, 8, 4, 8, 12, 6, 8, 12, 6, 8, 8, 6, 12, 8, 8, 18, 9, 4, 8, 16, 8, 8, 8, 6, 18, 12, 4, 10, 15, 9},
{1, 2, 2, 4, 2, 5, 3, 5, 3, 8, 2, 8, 4, 6, 4, 9, 2, 12, 4, 8, 4, 10, 3, 10, 6, 8, 4, 16, 2, 14, 4, 7, 8, 12, 4, 12, 4, 10, 4, 20, 2, 16, 6, 8, 6, 12, 3, 18, 6},
{2, 2, 3, 3, 4, 4, 4, 4, 6, 4, 4, 9, 5, 4, 8, 5, 6, 8, 4, 6, 12, 6, 4, 10, 9, 4, 10, 6, 6, 12, 4, 12, 12, 4, 8, 12, 8, 4, 12, 8, 6, 16, 4, 6, 20, 6, 6, 15, 9},
{1, 3, 2, 3, 3, 6, 2, 6, 3, 6, 4, 7, 2, 9, 4, 7, 4, 9, 2, 12, 6, 6, 4, 12, 3, 12, 4, 8, 4, 12, 4, 12, 4, 6, 8, 18, 2, 12, 4, 12, 6, 12, 2, 14, 9, 9, 4, 14, 3},
{2, 2, 4, 5, 3, 4, 6, 4, 6, 6, 5, 6, 6, 4, 9, 10, 4, 6, 8, 6, 8, 8, 6, 8, 8, 4, 12, 12, 4, 12, 9, 6, 8, 8, 12, 9, 8, 4, 12, 18, 4, 8, 10, 9, 12, 8, 6, 10, 12},
{1, 3, 2, 4, 2, 6, 2, 5, 4, 6, 2, 8, 2, 8, 6, 6, 2, 10, 3, 8, 5, 8, 2, 15, 3, 7, 5, 8, 4, 16, 2, 7, 6, 10, 4, 16, 2, 8, 8, 10, 2, 18, 3, 12, 8, 8, 2, 15, 6},
{2, 3, 4, 3, 6, 4, 3, 8, 8, 4, 6, 6, 6, 6, 8, 5, 8, 9, 4, 12, 9, 4, 8, 8, 9, 8, 8, 9, 9, 8, 4, 12, 16, 4, 12, 9, 6, 12, 8, 8, 10, 8, 6, 12, 18, 4, 8, 20, 8},
{2, 3, 2, 5, 2, 6, 4, 4, 3, 9, 2, 10, 4, 6, 4, 8, 3, 9, 4, 10, 4, 12, 2, 9, 6, 6, 8, 15, 2, 12, 4, 9, 4, 12, 4, 15, 6, 6, 4, 16, 3, 18, 4, 10, 6, 12, 4, 16, 6},
{2, 2, 5, 3, 4, 6, 5, 4, 5, 4, 6, 9, 4, 4, 12, 8, 4, 6, 6, 6, 12, 4, 6, 12, 6, 8, 9, 6, 4, 12, 8, 6, 12, 4, 12, 15, 4, 4, 15, 12, 6, 12, 6, 6, 12, 8, 8, 15, 6}}
Table[Length@Solve[{((a + k)/a) ((b + k)/b) == (n + k)/n, (n + k + 1) n ≥ a > b > 0}, {b, a}, Integers], {k, 9}, {n, 49}]
{1, 2, 3, 3, 4, 4, 4, 6, 6, 4, 6, 6, 4, 8, 10, 5, 6, 6, 6, 12, 8, 4, 8, 12, 6, 8, 12, 6, 8, 8, 6, 12, 8, 8, 18, 9, 4, 8, 16, 8, 8, 8, 6, 18, 12, 4, 10, 15, 9},
{1, 2, 2, 4, 2, 5, 3, 5, 3, 8, 2, 8, 4, 6, 4, 9, 2, 12, 4, 8, 4, 10, 3, 10, 6, 8, 4, 16, 2, 14, 4, 7, 8, 12, 4, 12, 4, 10, 4, 20, 2, 16, 6, 8, 6, 12, 3, 18, 6},
{1, 2, 3, 3, 4, 4, 4, 4, 6, 4, 4, 9, 5, 4, 8, 5, 6, 8, 4, 6, 12, 6, 4, 10, 9, 4, 10, 6, 6, 12, 4, 12, 12, 4, 8, 12, 8, 4, 12, 8, 6, 16, 4, 6, 20, 6, 6, 15, 9},
{1, 3, 2, 3, 3, 6, 2, 6, 3, 6, 4, 7, 2, 9, 4, 7, 4, 9, 2, 12, 6, 6, 4, 12, 3, 12, 4, 8, 4, 12, 4, 12, 4, 6, 8, 18, 2, 12, 4, 12, 6, 12, 2, 14, 9, 9, 4, 14, 3},
{2, 2, 4, 4, 3, 4, 6, 4, 6, 6, 5, 6, 6, 4, 9, 10, 4, 6, 8, 6, 8, 8, 6, 8, 8, 4, 12, 12, 4, 12, 9, 6, 8, 8, 12, 9, 8, 4, 12, 18, 4, 8, 10, 9, 12, 8, 6, 10, 12},
{1, 2, 2, 4, 2, 6, 2, 5, 4, 6, 2, 8, 2, 8, 6, 6, 2, 10, 3, 8, 5, 8, 2, 15, 3, 7, 5, 8, 4, 16, 2, 7, 6, 10, 4, 16, 2, 8, 8, 10, 2, 18, 3, 12, 8, 8, 2, 15, 6},
{2, 3, 4, 3, 6, 4, 3, 8, 7, 4, 6, 6, 6, 6, 8, 5, 8, 9, 4, 12, 9, 4, 8, 8, 9, 8, 8, 9, 9, 8, 4, 12, 16, 4, 12, 9, 6, 12, 8, 8, 10, 8, 6, 12, 18, 4, 8, 20, 8},
{1, 3, 2, 5, 2, 6, 4, 4, 3, 9, 2, 10, 4, 6, 4, 8, 3, 9, 4, 10, 4, 12, 2, 9, 6, 6, 8, 15, 2, 12, 4, 9, 4, 12, 4, 15, 6, 6, 4, 16, 3, 18, 4, 10, 6, 12, 4, 16, 6},
{2, 2, 4, 3, 4, 6, 5, 4, 5, 4, 6, 9, 4, 4, 12, 7, 4, 6, 6, 6, 12, 4, 6, 12, 6, 8, 9, 6, 4, 12, 8, 6, 12, 4, 12, 15, 4, 4, 15, 12, 6, 12, 6, 6, 12, 8, 8, 15, 6}} |