login
A097276
Least k such that the least common multiple of the numbers 1+n,1+2n,...1+kn is different from the denominator of 1 + 1/(1+n) + 1/(1+2n) +...+1/(1+kn).
0
5, 38, 29, 11, 4, 79, 14, 28, 24, 5, 13, 53, 18, 4, 213, 13, 10, 8, 5, 79, 9, 7, 4, 176, 40, 11, 8, 5, 40, 10, 9, 4, 39, 14, 27, 13, 5, 13, 6, 83, 4, 17, 8, 10, 23, 5, 7, 32, 22, 4, 19, 26, 28, 19, 5, 78, 38, 11, 4, 26, 14, 36, 18, 5, 12, 26, 17, 4, 16, 25, 9, 7, 5, 26, 11, 8, 4, 21, 10, 9
OFFSET
1,1
MATHEMATICA
Table[k=1; While[LCM@@Range[1, k*n+1, n] == Denominator[Total[1/Range[1, k*n+1, n]]], k++ ]; k+1, {n, 100}]
Table[k=1; While[LCM@@Range[1, k*n+1, n] == Denominator[Total[1/Range[1, k*n+1, n]]], k++ ]; k, {n, 100}]
CROSSREFS
Sequence in context: A372839 A061674 A247709 * A280437 A222646 A145156
KEYWORD
nonn
AUTHOR
T. D. Noe, Aug 03 2004
STATUS
approved