1,2

Complement of A204879; A097796(a(n)) = 0.

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

Eric Weisstein's World of Mathematics, Perfect Number

Wikipedia, Perfect number

a(38+k)=49+2k for all k>0 (up to occurrence of an odd perfect number, known to be > 10^300, if it exists). - M. F. Hasler, Feb 09 2012

(Haskell)

import Data.List (elemIndices)

a204878 n = a204878_list !! (n-1)

a204878_list = map (+ 1) $ elemIndices 0 a097796_list

Cf. A000396 (perfect numbers).

Sequence in context: A047253 A248910 A254278 * A037918 A043091 A031943

Adjacent sequences: A204875 A204876 A204877 * A204879 A204880 A204881

nonn

Reinhard Zumkeller, Jan 20 2012

approved