0,2

a(n) = n + A000030(n);

A061681 gives iteration when starting with 1.

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

(Haskell)

a182324 n = n + a000030 n

(Magma) [0] cat [n+d[#d] where d is Intseq(n): n in [1..65]]; // Bruno Berselli, Apr 25 2012

Cf. A095815.

Sequence in context: A263042 A230099 A098727 * A095815 A063114 A064806

Adjacent sequences: A182321 A182322 A182323 * A182325 A182326 A182327

nonn,base,easy

Reinhard Zumkeller, Apr 24 2012

approved