cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

A274052 Number of factor-free Dyck words with slope 5/2 and length 7n.

Original entry on oeis.org

1, 3, 13, 94, 810, 7667, 76998, 805560, 8684533, 95800850, 1076159466, 12268026894, 141565916433, 1650395185407, 19409211522550, 229984643863260, 2743097412254490, 32907239462485422, 396793477697214450, 4806417317271974580, 58460150525944945840, 713685698665966837135, 8742060290902752902340
Offset: 0

Views

Author

Michael D. Weiner, Jun 08 2016

Keywords

Comments

a(n) is the number of lattice paths (allowing only north and east steps) starting at (0,0) and ending at (2n,5n) that stay below the line y = 5/2x and also do not contain a proper subpath of smaller size.

Examples

			a(2) = 13 since there are 13 lattice paths (allowing only north and east steps) starting at (0,0) and ending at (4,10) that stay below the line y=5/2x and also do not contain a proper subpath of small size; e.g., EEENNNENNNNNNN is a factor-free Dyck word but ENNEENENNNNNNN contains the factor ENENNNN.
		

Crossrefs

Factor-free Dyck words: A005807 (slope 3/2), A274244 (slope 7/2), A274256 (slope 9/2), A274257 (slope 4/3), A274259 (slope 7/3).

Formula

Conjectural o.g.f.: Let E(x) = exp( Sum_{n >= 1} binomial(7*n, 2*n)*x^n/n ). Then A(x) = ( x/series reversion of x*E(x) )^(1/7) = 1 + 3*x + 13*x^2 + 94*x^3 + ... . Equivalently, [x^n]( A(x)^(7*n) ) = binomial(7*n, 2*n) for n = 0,1,2,... . - Peter Bala, Jan 01 2020

A322632 Decimal expansion of the real solution to 23*x^5 - 41*x^4 + 10*x^3 - 6*x^2 - x - 1 = 0. Constant occurring in the asymptotic behavior of the number of lattice paths of slope 2/5, observed by D. Knuth.

Original entry on oeis.org

1, 6, 3, 0, 2, 5, 7, 6, 6, 2, 9, 9, 0, 3, 5, 0, 1, 4, 0, 4, 2, 4, 8, 0, 1, 8, 4, 9, 3, 1, 5, 9, 8, 6, 3, 0, 0, 5, 1, 4, 5, 8, 4, 4, 2, 6, 6, 9, 0, 1, 4, 9, 4, 0, 5, 8, 4, 9, 8, 5, 0, 2, 6, 5, 9, 5, 2, 5, 6, 8, 9, 1, 2, 9, 8, 6, 8, 5, 0, 4, 7, 9, 8, 3, 4, 1, 3, 2, 4, 1
Offset: 1

Views

Author

Hugo Pfoertner, Dec 21 2018

Keywords

Comments

In his 2014 lecture in Paris "Problems That Philippe (Flajolet) Would Have Loved" D. Knuth discussed as Problem 4 "Lattice Paths of Slope 2/5" and reported as an empirical observation that A[5*t-1,2*t-1]/B[5*t-1,2*t-1] = a - b/t + O(t^-2), with constants a~=1.63026 and b~=0.159. For the meaning of A and B see A322631. The exact values of a (this sequence) and b (A322633) were found in 2016 by Banderier and Wallner.

Examples

			1.6302576629903501404248018493159863005145844266901494058498502659525689...
		

Crossrefs

Programs

  • Maple
    evalf[100](solve(23*x^5-41*x^4+10*x^3-6*x^2-x-1=0,x)[1]); # Muniru A Asiru, Dec 21 2018
  • Mathematica
    RealDigits[Root[23#^5 - 41#^4 + 10#^3 - 6#^2 - # - 1&, 1], 10, 100][[1]] (* Jean-François Alcover, Dec 30 2018 *)
  • PARI
    solve(x=1,2,23*x^5-41*x^4+10*x^3-6*x^2-x-1)

A322633 Decimal expansion of the real solution to 11571875*x^5 - 5363750*x^4 + 628250*x^3 - 97580*x^2 + 5180*x - 142 = 0, multiplied by 3/7. Constant occurring in the asymptotic behavior of the number of lattice paths of slope 2/5, observed by D. Knuth.

Original entry on oeis.org

1, 5, 8, 6, 6, 8, 2, 2, 6, 9, 7, 2, 0, 2, 2, 7, 7, 5, 5, 1, 4, 7, 8, 0, 4, 1, 9, 8, 1, 6, 3, 9, 2, 7, 3, 9, 2, 0, 6, 3, 7, 3, 7, 5, 7, 5, 5, 3, 0, 6, 6, 9, 7, 7, 9, 6, 3, 6, 6, 5, 2, 4, 0, 9, 5, 4, 4, 0, 7, 6, 7, 0, 2, 1, 0, 9, 5, 3, 1, 2, 5, 7, 9, 6, 1, 9, 1, 7, 1, 9, 2
Offset: 0

Views

Author

Hugo Pfoertner, Dec 21 2018

Keywords

Comments

In his 2014 lecture in Paris "Problems That Philippe (Flajolet) Would Have Loved" D. Knuth discussed as Problem 4 "Lattice Paths of Slope 2/5" and reported as an empirical observation that A[5*t-1,2*t-1]/B[5*t-1,2*t-1] = a - b/t + O(t^-2), with constants a~=1.63026 and b~=0.159. For the meaning of A and B see A322631. The exact values of a (A322632) and b (this sequence) were found in 2016 by Banderier and Wallner.

Examples

			0.1586682269720227755147804198163927392063737575530669779636652409544...
		

Crossrefs

Programs

  • Maple
    evalf[100]((3/7)*solve(11571875*x^5 -5363750*x^4 +628250*x^3 -97580*x^2 +5180*x -142=0, x)[1]); # Muniru A Asiru, Dec 21 2018
  • PARI
    (3/7)*solve(x=0, 1, 11571875*x^5 -5363750*x^4 +628250*x^3 -97580*x^2 +5180*x -142)
Showing 1-3 of 3 results.