A082688 Denominator of Sum_{k=1..n} 1/(n+k).

2, 12, 60, 840, 2520, 27720, 360360, 144144, 2450448, 232792560, 232792560, 5354228880, 26771144400, 11473347600, 332727080400, 20629078984800, 20629078984800, 144403552893600, 5342931457063200, 5342931457063200

Offset

1,1

Links

T. D. Noe, Table of n, a(n) for n=1..100

Formula

limit n ->infinity Sum_{k=1..n} 1/(n+k) = log(2).

Denominator of Psi(2*n+1)-Psi(n+1). - Vladeta Jovovic, Aug 24 2003

Example

1/2, 7/12, 37/60, 533/840, 1627/2520, 18107/27720, 237371/360360, ...

Mathematica

Table[HarmonicNumber[2 n] - HarmonicNumber[n], {n, 20}] // Denominator (* Eric W. Weisstein, Dec 14 2017 *)

Prog

(PARI) a(n) = denominator(sum(k=1, n, 1/(n+k))); \\ Michel Marcus, Dec 14 2017

Crossrefs

Cf. A058312, A082687 (numerators).

Sequence in context: A362238 A190425 A145630 * A099996 A352881 A099795

Adjacent sequences: A082685 A082686 A082687 * A082689 A082690 A082691

Keyword

frac,nonn,easy

Author

Benoit Cloitre, Apr 12 2003

Status

approved