

A218787


a(n) = A014486index for the nth tendril of infinite beanstalk (A213730(n)), with the "lesser numbers to the left side" construction.


15



0, 0, 0, 0, 1, 0, 0, 1, 2, 0, 0, 0, 1, 2, 0, 8, 0, 0, 1, 0, 0, 1, 2, 0, 8, 0, 0, 1, 8, 0, 0, 3, 0, 2, 1, 0, 0, 0, 1, 2, 0, 8, 0, 0, 1, 8, 0, 0, 3, 0, 2, 1, 0, 8, 0, 0, 3, 0, 60, 0, 0, 172, 0, 2, 0, 1, 0, 0, 1, 2, 0, 8, 0, 0, 1, 8, 0, 0, 3, 0, 2, 1, 0, 8, 0, 0
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,9


COMMENTS

"Tendrils" of the beanstalk are the finite sidetrees sprouting from its infinite trunk (see A179016) at the numbers given by A213730.


LINKS

A. Karttunen, Table of n, a(n) for n = 1..8727
A. Karttunen, Illustration of how binary trees (the second rightmost column) are encoded by A014486


EXAMPLE

A213730(9)=22, and from that branches 24 and 25 (as both A011371(24)=A011371(25)=22) and while 24 is a leaf (in A055938) the other branch 25 further branches to two leaves (as both A011371(28)=A011371(29)=25).
When we construct a binary tree from this in such a fashion that the lesser numbers go to the left, we obtain:
...........
...28...29.
.....\./...
..24..25...
...\ /.....
....22.....
...........
and the binary tree
........
...\./..
....*...
.\./....
..*.....
........
is located as A014486(2) in the normal encoding order of binary trees, thus a(9)=2.


PROG

(Scheme with Antti Karttunen's memoization macro definec):
(define (A218787 n) (Aux_for218787 (A213730 n)))
(definec (Aux_for218787 n) (cond ((zero? (A079559 n)) 0) ((not (zero? (A213719 n))) 1) (else (A072764bi (Aux_for218787 (A213723 n)) (Aux_for218787 (A213724 n))))))


CROSSREFS

These are the mirrorimages of binary trees given in A218788, i.e. a(n) = A057163(A218788(n)). A218786 gives the sizes of these trees. Cf. A072764, A218609, A218611.
Sequence in context: A174806 A089605 A218786 * A060016 A117408 A228360
Adjacent sequences: A218784 A218785 A218786 * A218788 A218789 A218790


KEYWORD

nonn


AUTHOR

Antti Karttunen, Nov 11 2012


STATUS

approved



