A279340 First differences of A055938.

3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 1, 1, 1, 3, 3, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3

Offset: 1

Author

Antti Karttunen, Mar 15 2017

Keywords

• nonn

Links

• Antti Karttunen, Table of n, a(n) for n = 1..8191

Crossrefs

Cf. A007814, A055938, A079559, A279353.

Programs

Mathematica

Differences@ Complement[Range@ Last@ #, #] &@ Table[IntegerExponent[(2 n)!, 2], {n, 0, 120}] (* Michael De Vlieger, Mar 15 2017, after Jean-François Alcover at A055938 *)

Scheme

(define (A279340 n) (- (A055938 (+ 1 n)) (A055938 n)))

Formula

a(n) = A055938(1+n) - A055938(n).