login
A285714
a(1) = 0; for n > 1, a(n) = 1 + a(A285712(n)).
6
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
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
KEYWORD
nonn
AUTHOR
Antti Karttunen, Apr 25 2017
STATUS
approved