A084115 a(n) = A084113(n) - 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) = 2*A084113(n) - A032741(n).

a(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. A032741, A066423, A084110, A084113, A084114, A084116.

Sequence in context: A220572 A083896 A332083 * A284154 A080028 A394370

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