A167376 Complement of the partition numbers.

0, 4, 6, 8, 9, 10, 12, 13, 14, 16, 17, 18, 19, 20, 21, 23, 24, 25, 26, 27, 28, 29, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 78, 79, 80, 81, 82

Offset: 1

Author

Reinhard Zumkeller, Nov 03 2009

Keywords

• nonn

Comments

Numbers not occurring in A000041;

A167392(a(n)) = 0.

Links

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

Crossrefs

Cf. A000041, A167377, A167392.

Programs

Haskell

import Data.List.Ordered (minus)
a167376 n = a167376_list !! n
a167376_list = minus [0..] a000041_list
-- Reinhard Zumkeller, Nov 03 2015