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-2 of 2 results.

A225164 Denominators of the sequence s(n) of the sum resp. product of fractions f(n) defined recursively by f(1) = 5/1; f(n+1) is chosen so that the sum and the product of the first n terms of the sequence are equal.

Original entry on oeis.org

1, 4, 84, 45444, 15686405364, 2147492192737717340004, 45388476229808808857318702720533556450342484
Offset: 1

Views

Author

Martin Renner, Apr 30 2013

Keywords

Comments

Numerators of the sequence s(n) of the sum resp. product of fractions f(n) is A165423(n+2), hence s(n) = sum(A165423(i+1)/A225157(i),i=1..n) = product(A165423(i+1)/A225157(i),i=1..n) = A165423(n+2)/a(n) = A176594(n-1)/a(n).

Examples

			f(n) = 5, 5/4, 25/21, 625/541, ...
5 + 5/4 = 5 * 5/4 = 25/4; 5 + 5/4 + 25/21 = 5 * 5/4 * 25/21 = 625/84; ...
s(n) = 1/b(n) = 5, 25/4, 625/84, ...
		

Crossrefs

Programs

  • Maple
    b:=proc(n) option remember; b(n-1)-b(n-1)^2; end:
    b(1):=1/5;
    a:=n->5^(2^(n-1))*b(n);
    seq(a(i),i=1..8);

Formula

a(n) = 5^(2^(n-1))*b(n) where b(n)=b(n-1)-b(n-1)^2 with b(1)=1/5.

A225200 Triangle (read by rows) of coefficients of the polynomials (in ascending order) of the denominators of the generalized sequence of fractions f(n) defined recursively by f(1) = m/1; f(n+1) is chosen so that the sum and the product of the first n terms of the sequence are equal.

Original entry on oeis.org

1, -1, 1, 1, -1, 1, 1, -2, 2, -1, 1, 1, -4, 8, -10, 9, -6, 3, -1, 1, 1, -8, 32, -84, 162, -244, 298, -302, 258, -188, 118, -64, 30, -12, 4, -1, 1, 1, -16, 128, -680, 2692, -8456, 21924, -48204, 91656, -152952, 226580, -300664, 359992, -391232, 387820, -352074, 293685, -225696, 160120, -105024, 63750, -35832, 18654, -8994, 4014, -1656, 630, -220, 70, -20, 5, -1, 1
Offset: 1

Views

Author

Martin Renner, May 01 2013

Keywords

Comments

The degree of the polynomial in row n > 1 is 2^(n-2), hence the number of coefficients in row n > 1 is given by 2^(n-2) + 1 = A094373(n-1).
For n > 2 a new row always begins and ends with 1.
The sum and product of the generalized sequence of fractions given by m^(2^(n-2)) divided by the polynomial p(n) are equal, i.e.,
m + m/(m-1) = m * m/(m-1) = m^2/(m-1);
m + m/(m-1) + m^2/(m^2-m+1) = m * m/(m-1) * m^2/(m^2-m+1) = m^4/(m^3-2*m^2+2*m-1).

Examples

			The triangle T(n,k), k = 0..2^(n-1), begins
   1;
  -1,  1;
   1, -1, 1;
   1, -2, 2,  -1, 1;
   1, -4, 8, -10, 9, -6, 3, -1, 1;
		

Crossrefs

Programs

  • Maple
    b:=n->m^(2^(n-2)); # n > 1
    b(1):=m;
    p:=proc(n) option remember; p(n-1)*a(n-1); end;
    p(1):=1;
    a:=proc(n) option remember; b(n)-p(n); end;
    a(1):=1;
    seq(op(PolynomialTools[CoefficientList](a(i),m,termorder=forward)),i=1..7);
Showing 1-2 of 2 results.