Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A057514
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A057514 Number of peaks in mountain ranges encoded by A014486, number of leaves in the corresponding rooted plane trees. (the root node is never counted as a leaf). +0
11
0, 1, 2, 1, 3, 2, 2, 2, 1, 4, 3, 3, 3, 2, 3, 2, 3, 3, 2, 2, 2, 2, 1, 5, 4, 4, 4, 3, 4, 3, 4, 4, 3, 3, 3, 3, 2, 4, 3, 3, 3, 2, 4, 3, 4, 4, 3, 3, 3, 3, 2, 3, 2, 3, 3, 2, 3, 3, 3, 2, 2, 2, 2, 2, 1, 6, 5, 5, 5, 4, 5, 4, 5, 5, 4, 4, 4, 4, 3, 5, 4, 4, 4, 3, 5, 4, 5, 5, 4, 4, 4, 4, 3, 4, 3, 4, 4, 3, 4, 4, 4, 3, 3, 3, 3 (list; graph; listen)
OFFSET

0,3

COMMENT

Partial sums from A014137[i]th to A014137[i+1]-1:th term of this sequence produce central binomial coefficients C(2n+1,n+1) (See comment at A001700): [seq(add(A057514[j],j=CatPsum(i)..(CatPsum(i+1)-1)),i=0..upto_n)];

LINKS

A. Karttunen, Gatomorphisms and other excursions ... (Includes Scheme program)

FORMULA

a(n) = wt(GrayCode(A014486[n]))/2 = A000120[A003188[A014486[n]]]/2 = A005811[A014486[n]]/2

MAPLE

Cat := n -> binomial(2*n, n)/(n+1); CatPsum := proc(n) option remember; if(0 = n) then RETURN(1); else RETURN(Cat(n)+CatPsum(n-1)); fi; end;

CROSSREFS

Cf. A057515. For Maple procedure GrayCode see A055095. a(n)-1 gives the number of zeros in A071153(n) (for n>=1).

Sequence in context: A071481 A162348 A084216 this_sequence A140720 A033559 A103151

Adjacent sequences: A057511 A057512 A057513 this_sequence A057515 A057516 A057517

KEYWORD

nonn

AUTHOR

Antti Karttunen Sep 03 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 November 24 23:16 EST 2009. Contains 167481 sequences.


AT&T Labs Research