A231606 Maximal possible numerator for a sum of the form 1 +/- 1/2 +/- 1/3 +/- ... +/- 1/n.

1, 3, 11, 25, 137, 127, 949, 2003, 7129, 7381, 83711, 86021, 1145993, 1171733, 1195757, 2436559, 42142223, 41461543, 800021557, 788381929, 799467289, 810048769, 18863914247, 19087007117, 99182995801, 100212655201, 312536252003, 315404588903

Offset

1,2

Links

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

Mathematica

nMax = 19; d = {0}; Table[d = Flatten[{d + 1/n, d - 1/n}]; Max[Abs[Numerator[d]]], {n, nMax}]

Crossrefs

Cf. A003418 (maximal denominator).

Cf. A061195 (minimal numerator), A232090 (minimal denominator).

Sequence in context: A111935 A175441 A001008 * A096617 A025529 A124078

Adjacent sequences: A231603 A231604 A231605 * A231607 A231608 A231609

Keyword

nonn

Author

T. D. Noe, Nov 19 2013

Status

approved