A285714 a(1) = 0; for n > 1, a(n) = 1 + a(A285712(n)).

0, 1, 2, 3, 2, 4, 5, 3, 6, 7, 4, 8, 3, 3, 9, 10, 5, 4, 11, 6, 12, 13, 4, 14, 4, 7, 15, 5, 8, 16, 17, 5, 6, 18, 9, 19, 20, 4, 5, 21, 4, 22, 7, 10, 23, 6, 11, 8, 24, 6, 25, 26, 5, 27, 28, 12, 29, 9, 7, 7, 5, 13, 4, 30, 14, 31, 8, 5, 32, 33, 15, 6, 10, 5, 34, 35, 8, 11, 36, 16, 9, 37, 6, 38, 6, 9, 39, 5, 17, 40, 41, 18, 12, 7, 6, 42, 43, 7, 44, 45, 19, 10, 13

Offset

1,3

Links

Antti Karttunen, Table of n, a(n) for n = 1..8192

Formula

a(1) = 0; for n > 1, a(n) = 1 + a(A285712(n)).

a(n) = A029837(1+A245611(n)).

a(n) = A285715(n) + A285716(n).

Prog

(Scheme)
;; First definition uses memoization-macro definec:
(definec (A285714 n) (if (<= n 1) 0 (+ 1 (A285714 (A285712 n)))))
(define (A285714 n) (A029837 (+ 1 (A245611 n))))

Crossrefs

Cf. A029837, A245611, A285712, A285713, A285715, A285716.

Sequence in context: A172520 A290094 A285904 * A161908 A026358 A304098

Adjacent sequences: A285711 A285712 A285713 * A285715 A285716 A285717

Keyword

nonn

Author

Antti Karttunen, Apr 25 2017

Status

approved