Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A057119
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A057119 Iterative "rewrite" sequence of binary plane trees. +0
5
2, 10, 180, 47940, 3185189700, 13760582141553025860, 254536428082497193743150874618461037380, 86730091025558229301371439971941296450524845723997443510460490068605668041540 (list; graph; listen)
OFFSET

0,1

COMMENT

This sequence is based on observation that the terms of A014486 (2n-digit balanced binary sequences) encode rooted plane trees with n+1 vertices (n edges), but also rooted binary plane trees with n+1 leaves, i.e. 2n edges, 2n+1 vertices.

LINKS

Index entries for sequences related to rooted trees

EXAMPLE

We start from the simplest such binary tree: 0.0 (binary depth-first encoding = 2, from left-to-right, 1 with the zero of the last leaf ignored); then encode it as an ordinary rooted plane tree (depth-first wise) to get the code 1010 = decimal 10, which in turn, when interpreted as an encoding of binary tree is:

..0.0

.0.1. (whose rooted plane tree coding is 10110100 = 180 in decimal)

..1.. etc.

MAPLE

a(n) = bt_df2tree_apply_k_times(2, n)

bt_df2tree_apply_k_times := proc(n, k) option remember; if(0 = k) then (n) else bt_df2tree_apply_k_times(bintree_depth_first2tree(n), k-1); fi; end;

bintree_depth_first2tree := n -> ((btdf2t(n*2, floor_log_2(n)+1)/2) - 2^(2*(floor_log_2(n)+1)));

btdf2t := proc(n, ii) local i, e, x, y; i := ii; if(n >= (2^i)) then x := btdf2t(n - (2^i), i-1); i := i - ((floor_log_2(x)+1)/2); y := btdf2t((n mod (2^i)), i-1); RETURN((2^(floor_log_2(y)+2))*((2^(floor_log_2(x)+1)) + x) + 2*y); else RETURN(2); fi; end;

CROSSREFS

Cf. A057120, A057121, A057122.

Sequence in context: A069994 A063573 A086675 this_sequence A037267 A001528 A088310

Adjacent sequences: A057116 A057117 A057118 this_sequence A057120 A057121 A057122

KEYWORD

nonn

AUTHOR

Antti Karttunen Aug 11 2000

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified July 4 18:25 EDT 2008. Contains 140886 sequences.


AT&T Labs Research