A101685 First differences of A101684.

1, -1, 3, 1, -1, 3, 1, -1, 3, 1, -2, 4, 1, -2, 4, 1, -1, 3, 1, -1, 3, 1, -3, 5, 1, -3, 5, 1, -1, 3, 1, -1, 3, 1, -2, 4, 1, -2, 4, 1, -1, 3, 1, -1, 3, 1, -4, 6, 1, -4, 6, 1, -1, 3, 1, -1, 3, 1, -2, 4, 1, -2, 4, 1, -1, 3, 1, -1, 3, 1, -3, 5, 1, -3, 5, 1, -1, 3, 1, -1, 3, 1, -2, 4, 1, -2, 4

Offset: 0

Author

Ralf Stephan, Dec 13 2004

Keywords

• sign

Comments

Presumably the sequence can be derived from A007814.

Crossrefs

Cf. A007814, A101684.

Programs

Mathematica

Differences[IntegerExponent[Denominator[With[{nn = 80}, CoefficientList[Series[Exp[-1 + Sqrt[1 + x]], {x, 0, nn}], x] Range[0, nn]!]], 2]] (* Wesley Ivan Hurt, May 26 2024 after Harvey P. Dale *)

Formula

a(n) = A101684(n+1) - A101684(n). - Wesley Ivan Hurt, May 26 2024