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

A220086 Decimal expansion of Gamma(1/7).

Original entry on oeis.org

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

Views

Author

Bruno Berselli, Dec 12 2012

Keywords

Comments

(A220086/A220605)*(A220607/A220606) = A160389, which is the case n=7 of (Gamma(1/n)/Gamma(2/n))*(Gamma((n-1)/n)/Gamma((n-2)/n)) = 2*cos(Pi/n).
A220086*A220605*A220606*A220607*A220608*A220609 = (2*Pi)^3/sqrt(7), which is the case n=7 of product(Gamma(i/n), i=1..n-1) = sqrt((2*Pi)^(n-1)/n) (see also the second link to Wikipedia).
Continued fraction expansion: 6, 1, 1, 4, 1, 2, 2, 1, 5, 1, 10, 7, 1,...

Examples

			6.5480629402478244377140933494289962626211351873841351...
		

Programs

  • Magma
    SetDefaultRealField(RealField(100)); Gamma(1/7); // G. C. Greubel, Mar 10 2018
  • Mathematica
    RealDigits[Gamma[1/7], 10, 90][[1]]
  • Maxima
    fpprec:90; ev(bfloat(gamma(1/7)));
    
  • PARI
    default(realprecision, 100); gamma(1/7) \\ G. C. Greubel, Mar 10 2018
    

Formula

Equals Pi * csc(Pi/7) / A220607, where csc is the cosecant function.
(A220086/A220605) * (A220607/A220606) = A160389, which is the case n=7 of (Gamma(1/n)/Gamma(2/n))*(Gamma((n-1)/n)/Gamma((n-2)/n)) = 2*cos(Pi/n).
A220086*A220605*A220606*A220607*A220608*A220609 = (2*Pi)^3/sqrt(7), which is the case n=7 of product(Gamma(i/n), i=1..n-1) = sqrt((2*Pi)^(n-1)/n) (see also the second link to Wikipedia).

A020077 a(n) = floor( Gamma(n+3/7)/Gamma(3/7) ).

Original entry on oeis.org

1, 0, 0, 1, 5, 22, 122, 787, 5852, 49330, 465112, 4850460, 55433829, 688963306, 9251792972, 133490155743, 2059562402902, 33835668047686, 589707357402530, 10867464157846629, 211139303638163096, 4313274345751046120
Offset: 0

Views

Author

Keywords

Crossrefs

Programs

  • Magma
    [Floor(Gamma(n+3/7)/Gamma(3/7)): n in [0..25]]; // G. C. Greubel, Nov 17 2019
    
  • Maple
    Digits := 64:f := proc(n,x) trunc(GAMMA(n+x)/GAMMA(x)); end;
    seq(floor(pochhammer(3/7,n)), n = 0..25); # G. C. Greubel, Nov 17 2019
  • Mathematica
    Floor[Pochhammer[3/7, Range[0, 25]]] (* G. C. Greubel, Nov 17 2019 *)
  • PARI
    vector(26, n, my(x=3/7); gamma(n-1+x)\gamma(x) ) \\ G. C. Greubel, Nov 17 2019
    
  • Sage
    [floor(rising_factorial(3/7, n)) for n in (0..25)] # G. C. Greubel, Nov 17 2019

A220609 Decimal expansion of Gamma(4/7).

Original entry on oeis.org

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

Views

Author

Bruno Berselli, Dec 17 2012

Keywords

Comments

See the second comment of A220086.

Examples

			1.5585810329024750082750092912459739225208504720945386...
		

Programs

  • Mathematica
    RealDigits[Gamma[4/7], 10, 90][[1]]
  • Maxima
    fpprec:90; ev(bfloat(gamma(4/7)));

Formula

Equals Pi*sec(Pi/14)/A220608.

A020122 Ceiling of Gamma(n+3/7)/Gamma(3/7).

Original entry on oeis.org

1, 1, 1, 2, 6, 23, 123, 788, 5853, 49331, 465113, 4850461, 55433830, 688963307, 9251792973, 133490155744, 2059562402903, 33835668047687, 589707357402531, 10867464157846630, 211139303638163097, 4313274345751046121
Offset: 0

Views

Author

Keywords

Crossrefs

Cf. A220608.

Programs

  • Maple
    Digits := 64:f := proc(n,x) ceil(GAMMA(n+x)/GAMMA(x)); end;

A020032 Nearest integer to Gamma(n + 3/7)/Gamma(3/7).

Original entry on oeis.org

1, 0, 1, 1, 5, 23, 123, 788, 5853, 49330, 465113, 4850460, 55433829, 688963306, 9251792972, 133490155744, 2059562402903, 33835668047686, 589707357402530, 10867464157846630, 211139303638163097, 4313274345751046120
Offset: 0

Views

Author

Keywords

Comments

Gamma(n + 3/7)/Gamma(3/7) = 1, 3/7, 30/49, 510/343, 12240/2401, 379440/16807, 14418720/117649, 648842400/823543, ... - R. J. Mathar, Sep 04 2016

Crossrefs

Programs

  • Maple
    Digits := 64:f := proc(n,x) round(GAMMA(n+x)/GAMMA(x)); end;
Showing 1-5 of 5 results.