A166940 Numerators of partial sums (n+1)/n (sorted).

2, 7, 29, 73, 169, 437, 1343, 3001, 29809, 32581, 388631, 418661, 5830673, 6216773, 6601157, 13968079, 87787741, 127494581, 132902893, 250430303, 366225215, 1749648679, 3180922571, 9914589163, 257145392467, 266412327067

Offset

1,1

Links

Table of n, a(n) for n=1..26.

Mathematica

s=0; lst={}; Do[AppendTo[lst, Numerator[s+=((n+1)/n)]], {n, 5!}]; Union@lst
Numerator[Accumulate[Table[(n+1)/n, {n, 30}]]]//Sort (* Harvey P. Dale, Sep 03 2022 *)

Crossrefs

Cf. A166939

Sequence in context: A083016 A062064 A158024 * A166939 A261182 A155186

Adjacent sequences: A166937 A166938 A166939 * A166941 A166942 A166943

Keyword

nonn,frac

Author

Vladimir Joseph Stephan Orlovsky, Oct 24 2009

Status

approved