A051950 Differences between values of tau(n) (A000005): a(n) = tau(n)-tau(n-1).

1, 0, 1, -1, 2, -2, 2, -1, 1, -2, 4, -4, 2, 0, 1, -3, 4, -4, 4, -2, 0, -2, 6, -5, 1, 0, 2, -4, 6, -6, 4, -2, 0, 0, 5, -7, 2, 0, 4, -6, 6, -6, 4, 0, -2, -2, 8, -7, 3, -2, 2, -4, 6, -4, 4, -4, 0, -2, 10, -10, 2, 2, 1, -3, 4, -6, 4, -2, 4, -6, 10, -10, 2, 2, 0, -2, 4, -6, 8, -5, -1, -2, 10, -8, 0, 0, 4, -6, 10

Offset

2,5

Links

N. J. A. Sloane, Table of n, a(n) for n = 2..20000 [First 10000 terms from T. D. Noe]

Formula

G.f.: (1-x)*sum(k >= 1, x^k/(1-x^k)). - Benoit Cloitre, Apr 24 2003

Mathematica

Differences[DivisorSigma[0, Range[100]]] (* Alonso del Arte, Oct 14 2013, based on T. D. Noe's program for A182394 *)

Prog

(Haskell)
a051950 n = a051950_list !! n
a051950_list = 1 : zipWith (-) (tail a000005_list) a000005_list
-- Reinhard Zumkeller, Feb 04 2013

Crossrefs

Cf. A000005, A058197, A058198, A058199.

Sequence in context: A216651 A071338 A078826 * A341062 A172353 A282011

Adjacent sequences: A051947 A051948 A051949 * A051951 A051952 A051953

Keyword

sign,easy

Author

Asher Auel, Dec 16 1999

Extensions

Edited (and offset corrected) by N. J. A. Sloane, Oct 05 2017

Status

approved