A084115 A084113(n) minus A084114(n).

0, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 3, 1, 1, 1, 2, 1, 3, 1, 3, 1, 1, 1, 3, 2, 1, 1, 3, 1, 3, 1, 3, 1, 1, 1, 4, 1, 1, 1, 3, 1, 3, 1, 3, 3, 1, 1, 3, 2, 3, 1, 3, 1, 3, 1, 3, 1, 1, 1, 3, 1, 1, 3, 2, 1, 3, 1, 3, 1, 3, 1, 3, 1, 1, 3, 3, 1, 3, 1, 3, 2, 1, 1, 3, 1, 1, 1, 3, 1, 3, 1, 3, 1, 1, 1, 3, 1, 3, 3, 4, 1, 3, 1, 3, 3

Offset

1,4

Comments

a(n) = A084113(n) - A084114(n) = 2*A084113(n) - A032741(n) = A032741(n) - 2*A084114(n);

a(A084116(n)) = 1.

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Prog

(Haskell)
a084115 n = a084113 n - a084114 n -- Reinhard Zumkeller, Jul 31 2014

Crossrefs

Cf. A066423, A084116.

Cf. A084110, A084113, A084114.

Sequence in context: A220572 A083896 A332083 * A284154 A080028 A309228

Adjacent sequences: A084112 A084113 A084114 * A084116 A084117 A084118

Keyword

nonn

Author

Reinhard Zumkeller, May 12 2003

Extensions

Definition fixed by Reinhard Zumkeller, Jul 31 2014

Status

approved