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

A000566 Heptagonal numbers (or 7-gonal numbers): n*(5*n-3)/2.

Original entry on oeis.org

0, 1, 7, 18, 34, 55, 81, 112, 148, 189, 235, 286, 342, 403, 469, 540, 616, 697, 783, 874, 970, 1071, 1177, 1288, 1404, 1525, 1651, 1782, 1918, 2059, 2205, 2356, 2512, 2673, 2839, 3010, 3186, 3367, 3553, 3744, 3940, 4141, 4347, 4558, 4774, 4995, 5221, 5452, 5688
Offset: 0

Views

Author

Keywords

Comments

Binomial transform of (0, 1, 5, 0, 0, 0, ...). Binomial transform is A084899. - Paul Barry, Jun 10 2003
Row sums of triangle A131413. - Gary W. Adamson, Jul 08 2007
Sequence starting (1, 7, 18, 34, ...) = binomial transform of (1, 6, 5, 0, 0, 0, ...). Also row sums of triangle A131896. - Gary W. Adamson, Jul 24 2007
Also the partial sums of A016861, a zero added in front; therefore a(n) = n (mod 5). - R. J. Mathar, Mar 19 2008
Also sequence found by reading the line from 0, in the direction 0, 7, ..., and the line from 1, in the direction 1, 18, ..., in the square spiral whose edges have length A195013 and whose vertices are the numbers A195014. These parallel lines are the semi-axes perpendicular to the main axis A195015 in the same spiral. - Omar E. Pol, Oct 14 2011
Also sequence found by reading the line from 0, in the direction 0, 7, ... and the parallel line from 1, in the direction 1, 18, ..., in the square spiral whose vertices are the generalized heptagonal numbers A085787. - Omar E. Pol, Jul 18 2012
Partial sums give A002413. - Omar E. Pol, Jan 12 2013
The n-th heptagonal number equals the sum of the n consecutive integers starting at 2*n-1; for example, 1, 3+4, 5+6+7, 7+8+9+10, etc. In general, the n-th (2k+1)-gonal number is the sum of the n consecutive integers starting at (k-1)*n - (k-2). When k = 1 and 2, this result generates the triangular numbers, A000217, and the pentagonal numbers, A000326, respectively. - Charlie Marion, Mar 02 2022

Examples

			G.f. = x + 7*x^2 + 18*x^3 + 34*x^4 + 55*x^5 + 81*x^6 + 112*x^7 + ... - _Michael Somos_, Jan 25 2019
		

References

  • Albert H. Beiler, Recreations in the Theory of Numbers, Dover, NY, 1964, p. 189.
  • John H. Conway and Richard K. Guy, The Book of Numbers, New York: Springer-Verlag, 1996. See p. 38.
  • E. Deza and M. M. Deza, Figurate numbers, World Scientific Publishing (2012), page 6.
  • Leonard E. Dickson, History of the Theory of Numbers. Carnegie Institute Public. 256, Washington, DC, Vol. 1, 1919; Vol. 2, 1920; Vol. 3, 1923, see vol. 2, p. 2.
  • N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • David Wells, The Penguin Dictionary of Curious and Interesting Numbers. Penguin Books, NY, 1986, Revised edition 1987. See p. 123.

Crossrefs

a(n)= A093562(n+1, 2), (5, 1)-Pascal column.
Cf. sequences listed in A254963.

Programs

  • Haskell
    a000566 n = n * (5 * (n - 1) + 2) `div` 2
    a000566_list = scanl (+) 0 a016861_list  -- Reinhard Zumkeller, Jun 16 2013
    
  • Magma
    a000566:=func< n | n*(5*n-3) div 2 >; [ a000566(n): n in [0..50] ];
    
  • Maple
    A000566 := proc(n)
            n*(5*n-3)/2 ;
    end proc:
    seq(A000566(n),n=0..30); # R. J. Mathar, Oct 02 2020
  • Mathematica
    Table[n (5n - 3)/2, {n, 0, 50}] (* or *) LinearRecurrence[{3, -3, 1}, {0, 1, 7}, 50] (* Harvey P. Dale, Oct 13 2011 *)
    Join[{0},Accumulate[Range[1,315,5]]] (* Harvey P. Dale, Mar 26 2016 *)
    (* For Mathematica 10.4+ *) Table[PolygonalNumber[RegularPolygon[7], n], {n, 0, 48}] (* Arkadiusz Wesolowski, Aug 27 2016 *)
    PolygonalNumber[7,Range[0,50]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 23 2021 *)
  • Maxima
    makelist(n*(5*n-3)/2, n, 0, 20); /* Martin Ettl, Dec 11 2012 */
    
  • PARI
    a(n) = n * (5*n - 3) / 2
    
  • Python
    # Intended to compute the initial segment of the sequence, not isolated terms.
    def aList():
         x, y = 1, 1
         yield 0
         while True:
             yield x
             x, y = x + y + 5, y + 5
    A000566 = aList()
    print([next(A000566) for i in range(49)]) # Peter Luschny, Aug 04 2019
    
  • Python
    [n*(5*n-3)//2 for n in range(50)] # Gennady Eremin, Mar 24 2022

Formula

G.f.: x*(1 + 4*x)/(1 - x)^3. Simon Plouffe in his 1992 dissertation.
a(n) = C(n, 1) + 5*C(n, 2). - Paul Barry, Jun 10 2003
a(n) = Sum_{k = 1..n} (4*n - 3*k). - Paul Barry, Sep 06 2005
a(n) = n + 5*A000217(n-1) - Floor van Lamoen, Oct 14 2005
a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for a(0) = 0, a(1) = 1, a(2) = 7. - Jaume Oliver Lafont, Dec 02 2008
a(n+1) = A153126(n) + n mod 2; a(2*n+1) = A033571(n); a(2*(n+1)) = A153127(n) + 1. - Reinhard Zumkeller, Dec 20 2008
40*a(n)+ 9 = A017354(n-1). - Ken Rosenbaum, Dec 02 2009.
a(n) = 2*a(n-1) - a(n-2) + 5, with a(0) = 0 and a(1) = 1. - Mohamed Bouhamida, May 05 2010
a(n) = A000217(n) + 4*A000217(n-1). - Vincenzo Librandi, Nov 20 2010
a(n) = a(n-1) + 5*n - 4, with a(0) = 0. - Vincenzo Librandi, Nov 20 2010
a(n) = A130520(5*n). - Philippe Deléham, Mar 26 2013
a(5*a(n) + 11*n + 1) = a(5*a(n) + 11*n) + a(5*n + 1). - Vladimir Shevelev, Jan 24 2014
Sum_{n>=1} 1/a(n) = sqrt(1 - 2/sqrt(5))*Pi/3 + 5*log(5)/6 - sqrt(5)*log((1 + sqrt(5))/2)/3 = 1.32277925312238885674944226131... . See A244639. - Vaclav Kotesovec, Apr 27 2016
E.g.f.: x*(2 + 5*x)*exp(x)/2. - Ilya Gutkovskiy, Aug 27 2016
From Charlie Marion, May 02 2017: (Start)
a(n+m) = a(n) + 5*n*m + a(m);
a(n-m) = a(n) - 5*n*m + a(m) + 3*m;
a(n) - a(m) = (5*(n + m) - 3)*(n - m)/2.
In general, let P(k,n) be the n-th k-gonal number. Then
P(k,n+m) = P(k,n) + (k - 2)*n*m + P(k,m);
P(k,n-m) = P(k,n) - (k - 2)*n*m + P(k,m) + (k - 4)*m;
P(k,n) - P(k,m) = ((k-2)*(n + m) + 4 - k)*(n - m)/2.
(End)
a(n) = A147875(-n) for all n in Z. - Michael Somos, Jan 25 2019
a(n) = A000217(n-1) + A000217(2*n-1). - Charlie Marion, Dec 19 2019
Product_{n>=2} (1 - 1/a(n)) = 5/7. - Amiram Eldar, Jan 21 2021
a(n) + a(n+1) = (2*n+1)^2 + n^2 - 2*n. In general, if we let P(k,n) = the n-th k-gonal number, then P(k^2-k+1,n)+ P(k^2-k+1,n+1) = ((k-1)*n+1)^2 + (k-2)*(n^2-2*n) = ((k-1)*n+1)^2 + (k-2)*A005563(n-2). When k = 2, this formula reduces to the well-known triangular number formula: T(n) + T(n+1) = (n+1)^2. - Charlie Marion, Jul 01 2021

Extensions

Partially edited by Joerg Arndt, Mar 11 2010

A244645 Decimal expansion of the sum of the reciprocals of the octagonal numbers (A000567).

Original entry on oeis.org

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

Views

Author

Robert G. Wilson v, Jul 03 2014

Keywords

Examples

			1.2774090575596367311949534921024332115566344803902472326934919840751515151955452...
		

Crossrefs

Programs

  • Mathematica
    RealDigits[ Sum[1/(3n^2 - 2n), {n, 1 , Infinity}], 10, 111][[1]]
  • PARI
    sumpos(n=1, 1/(3*n^2 - 2*n)) \\ Michel Marcus, Sep 12 2016
    
  • PARI
    sumnumrat(1/(3*n-2)/n,1) \\ Charles R Greathouse IV, Feb 08 2023

Formula

Equals Sum_{n>=1} 1/(3*n^2 - 2*n).
Equals Pi/(4*sqrt(3)) + 3*log(3)/4. - Vaclav Kotesovec, Jul 05 2014

A244646 Decimal expansion of the sum of the reciprocals of the 9-gonal (or enneagonal or nonagonal) numbers (A001106).

Original entry on oeis.org

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

Views

Author

Robert G. Wilson v, Jul 03 2014

Keywords

Examples

			1.2433209261537129892066077396310142821358441010300996244152817525...
		

Crossrefs

Programs

  • Mathematica
    RealDigits[ Sum[2/(7n^2 - 5n), {n, 1 , Infinity}], 10, 111][[1]]

Formula

Equals Sum_{n>=1} 2/(7n^2 - 5n).
Equals (2*log(14) + 4*(cos(Pi/7)*log(cos(3*Pi/14)) + log(sin(Pi/7))*sin(Pi/14) - log(cos(Pi/14)) * sin(3*Pi/14)) + Pi*tan(3*Pi/14))/5. - Vaclav Kotesovec, Jul 04 2014
Equals 14/25 - (2/5)*(gamma + psi(-5/7)), where gamma is Euler's constant (A001620) and psi(x) is the digamma function (Agarwal, 2021), psi(-5/7) = psi(2/7)+7/5 = -2.285517..., see A354628. - Amiram Eldar, Nov 12 2021

A244647 Decimal expansion of the sum of the reciprocals of the decagonal numbers (A001107).

Original entry on oeis.org

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

Views

Author

Robert G. Wilson v, Jul 03 2014

Keywords

Comments

For the partial sums of the reciprocals of the (positive) decagonal numbers see A250551(n+1)/A294515(n), n >= 0. - Wolfdieter Lang, Nov 07 2017

Examples

			1.216745956158244182494339352004760382108361700922772890949837441544696356350....
		

Crossrefs

Programs

  • Mathematica
    RealDigits[ Log[2] + Pi/6, 10, 111][[1]] (* or *)
    RealDigits[ Sum[1/(4n^2 - 3n), {n, 1 , Infinity}], 10, 111][[1]]
  • PARI
    log(2)+Pi/6 \\ Charles R Greathouse IV, Feb 08 2023

Formula

Sum_{n>0} 1/(4n^2 - 3n) = log(2) + Pi/6, (A002162 + A019673).

A244649 Decimal expansion of the sum of the reciprocals of the Dodecagonal numbers (A051624).

Original entry on oeis.org

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

Views

Author

Robert G. Wilson v, Jul 03 2014

Keywords

Comments

From Wolfdieter Lang, Nov 09 2017: (Start)
In the Downey et al. link this is the instance k = 5 of the formula given there for S_{2*k+2}. A simpler formula is given in the Koecher reference as (5/4)*v_5(1) on p. 192. See the Kotesovec formula given below.
The partial sums are given in A294520/A294521. (End)

Examples

			1.1779560579226638587351739680918874184458572345666798028425228573...
		

References

  • Max Koecher, Klassische elementare Analysis, Birkhäuser, Basel, Boston, 1987, pp. 189 - 193.

Crossrefs

Programs

  • Mathematica
    RealDigits[ Sum[1/(5n^2 - 4n), {n, 1 , Infinity}], 10, 111][[1]]

Formula

Equals Sum_{n>=1} 1/(5n^2 - 4n).
Equals Pi/8*sqrt(1+2/sqrt(5)) + (5*log(5) + sqrt(5)*log((3+sqrt(5))/2))/16. - Vaclav Kotesovec, Jul 04 2014
This is the value given in the Koecher reference (see a comment above), and rewritten with the golden section phi = (1 + sqrt(5))/2 this becomes
((5/2)*log(5) + (2*phi - 1)*(log(phi) + (Pi/5)*sqrt(3 + 4*phi)))/8. - Wolfdieter Lang, Nov 09 2017

A244648 Decimal expansion of the sum of the reciprocals of the hendecagonal numbers (A051682).

Original entry on oeis.org

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

Views

Author

Robert G. Wilson v, Jul 03 2014

Keywords

Examples

			1.195434116529627974352499234698499354884682627084658062386021603017...
		

Crossrefs

Programs

  • Mathematica
    RealDigits[ Sum[2/(9n^2 - 7n), {n, 1 , Infinity}], 10, 111][[1]]

Formula

Sum_{n=1..infinity} 2/(9n^2 - 7n).
Equals (5*log(3) + Pi*cot(2*Pi/9) - 4*cos(2*Pi/9)*log(cos(Pi/18)) + 4*cos(Pi/9)*log(sin(2*Pi/9)) - 4*log(sin(Pi/9))*sin(Pi/18))/7. - Vaclav Kotesovec, Jul 04 2014

A244641 Decimal expansion of the sum of the reciprocals of the pentagonal numbers (A000326).

Original entry on oeis.org

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

Views

Author

Robert G. Wilson v, Jul 03 2014

Keywords

Examples

			1.482037501770111223591657453125421381658405425375507779634198065524359698529473...
		

Crossrefs

Decimal expansion of the sum of the reciprocals of the m-gonal numbers: A000038 (m=3), A013661 (m=4), this sequence (m=5), A016627 (m=6), A244639 (m=7), A244645 (m=8), A244646 (m=9), A244647 (m=10), A244648 (m=11), A244649 (m=12), A275792 (m=14).

Programs

  • Magma
    SetDefaultRealField(RealField(139)); R:= RealField(); 3*Log(3)-Pi(R)*Sqrt(3)/3; // G. C. Greubel, Mar 24 2024
    
  • Mathematica
    RealDigits[Sum[2/(3*n^2-n), {n,1,Infinity}], 10, 111][[1]]
    RealDigits[3*Log[3] - Pi*Sqrt[3]/3, 10, 140][[1]] (* G. C. Greubel, Mar 24 2024 *)
  • SageMath
    numerical_approx(3*log(3)-pi*sqrt(3)/3, digits=139) # G. C. Greubel, Mar 24 2024

Formula

Sum_{n>=1} 2/(3*n^2 - n).
Equals 3*log(3) - Pi*sqrt(3)/3 = A016650 - A093602. - Michel Marcus, Jul 03 2014
Equals 2*A294514. - Hugo Pfoertner, Apr 24 2025

A294826 Numerators of the partial sums of the reciprocals of twice the heptagonal numbers (k + 1)*(5*k + 2) = A135706(k+1) = 2*A000566(k+1), for k >= 0.

Original entry on oeis.org

1, 4, 151, 1315, 36698, 667109, 10749479, 399851303, 401511863, 18933826729, 246810236317, 4700047812703, 145981746528913, 9796912235587651, 9810925971351679, 9823210739716249, 403196782523223569, 11704197956499986461, 269433333504358946963, 5231145593209503407215, 747842028258712790473
Offset: 0

Views

Author

Wolfdieter Lang, Nov 16 2017

Keywords

Comments

The corresponding denominators are given in A294827.
For the general case V(m,r;n) = Sum_{k=0..n} 1/((k + 1)*(m*k + r)) = (1/(m - r))*Sum_{k=0..n} (m/(m*k + r) - 1/(k+1)), for r = 1, ..., m-1 and m = 2, 3, ..., and their limits see a comment in A294512. Here [m,r] = [5,2].
The limit of the series is V(5,2) = lim_{n -> oo} V(5,2;n) = ((5/2)*log(5) - (2*phi-1)*(log(phi) - (Pi/5)*sqrt(7-4*phi)))/6, with the golden section phi:= (1 + sqrt(5))/2. The value is 0.661389626561... given by (1/2)*A244639.
In the Koecher reference v_5(2) = (3/5)*V(5,2) = 0.39683377593671665701 ...is given as (1/4)*log(5) - (1/(2*sqrt(5)))*log((1 + sqrt(5))/2) + (Pi/10)*sqrt((5 - 2*sqrt(5))/5).

Examples

			The rationals V(5,2;n), n >= 0, begin: 1/2, 4/7, 151/252, 1315/2142, 36698/58905, 667109/1060290, 10749479/16964640, 399851303/627691680, 401511863/627691680, 18933826729/29501508960, 246810236317/383519616480, ...
V(5,2;10^6) = 0.6613894266 (Maple, 10 digits) to be compared with 0.6613896266 giving the 10 digit value of V(5,2) from (1/2)*A244649.
		

References

  • Max Koecher, Klassische elementare Analysis, Birkhäuser, Basel, Boston, 1987, Eulersche Reihen, pp. 189 - 193.

Crossrefs

Programs

  • Magma
    [Numerator((&+[1/((k+1)*(5*k+2)): k in [0..n]])): n in [0..25]]; // G. C. Greubel, Aug 29 2018
  • Mathematica
    Table[Numerator[Sum[1/((k+1)*(5*k+2)), {k,0,n}]], {n,0,25}] (* G. C. Greubel, Aug 29 2018 *)
    Accumulate[1/(2*PolygonalNumber[7,Range[30]])]//Numerator (* Harvey P. Dale, Aug 31 2023 *)
  • PARI
    a(n) = numerator(sum(k=0, n, 1/((k + 1)*(5*k + 2)))); \\ Michel Marcus, Nov 17 2017
    

Formula

a(n) = numerator(V(5,2;n)) with V(5,2;n) = Sum_{k=0..n} 1/((k + 1)*(5*k + 2)) = Sum_{k=0..n} 1/A135706(k+1) = (1/3)*Sum_{k=0..n} (1/(k + 2/5) - 1/(k+1)) = (-Psi(2/5) + Psi(n+7/5) - (gamma + Psi(n+2)))/3 with the digamma function Psi and the Euler-Mascheroni constant gamma = -Psi(1) from A001620.

A365522 Decimal expansion of (Pi*sqrt(3) + 9*log(3))/24.

Original entry on oeis.org

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

Views

Author

Claude H. R. Dequatre, Sep 08 2023

Keywords

Comments

This sequence is also the decimal expansion of Sum_{k>=1} 1/(f(k) +g(k)), where f(k) and g(k) are respectively the k-th triangular and the 13-gonal numbers (A000217 and A051865).

Examples

			0.63870452877981836559747674605121660577831724019512...
		

Crossrefs

Programs

  • Magma
    SetDefaultRealField(RealField(139)); R:= RealField(); (Pi(R)*Sqrt(3)+9*Log(3))/24; // G. C. Greubel, Mar 24 2024
    
  • Mathematica
    RealDigits[(Pi*Sqrt[3] + 9*Log[3])/24, 10 , 100][[1]] (* Amiram Eldar, Sep 08 2023 *)
  • PARI
    (Pi*sqrt(3)+9*log(3))/24
    
  • SageMath
    numerical_approx((pi*sqrt(3)+9*log(3))/24, digits=139) # G. C. Greubel, Mar 24 2024

Formula

Equals Sum_{k>=1} 1/(6*k^2 - 4*k) = A244645/2 [Shamos].
Equals - Integral_{x=0..1} log(1-x^6)/x^5 dx [Shamos].
Showing 1-9 of 9 results.