login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A130820 Decimal expansion of number whose Engel expansion is given by the sequence: 1,1,2,2,3,3,4,4,...Ceiling[n/2],... 4
2, 8, 7, 0, 2, 2, 2, 1, 5, 6, 9, 7, 3, 3, 9, 6, 3, 3, 0, 8, 1, 9, 4, 5, 8, 8, 6, 5, 8, 1, 1, 1, 9, 9, 6, 0, 1, 2, 4, 0, 3, 1, 9, 2, 6, 2, 2, 8, 0, 9, 9, 5, 7, 0, 1, 2, 0, 3, 1, 2, 7, 7, 3, 6, 2, 7, 2, 8, 5, 0, 3, 8, 0, 7, 6, 8, 0, 3, 7, 5, 2, 7, 8, 4, 5, 6, 3, 9, 2, 3, 6, 1, 5, 0, 7, 1, 4, 8, 2, 4 (list; constant; graph; refs; listen; history; text; internal format)
OFFSET

1,1

REFERENCES

Engel, F. "Entwicklung der Zahlen nach Stammbruechen" Verhandlungen der 52. Versammlung deutscher Philologen und Schulmaenner in Marburg. pp. 190-191, 1913.

LINKS

Table of n, a(n) for n=1..100.

F. Engel, Entwicklung der Zahlen nach Stammbruechen, Verhandlungen der 52. Versammlung deutscher Philologen und Schulmaenner in Marburg, 1913, pp. 190-191. English translation by Georg Fischer, included with his permission.

Eric Weisstein's World of Mathematics, Engel Expansion.

FORMULA

From Peter Bala, Jul 01 2016: (Start)

Constant c = 1/1 + 1/(1*1) + 1/(1*1*2) + 1/(1*1*2*2) + 1/(1*1*2*2*3) + 1/(1*1*2*2*3*3) + ... = Sum_{n >= 1} binomial(n,floor(n/2))/n!.

Alternative series representations:

c = 3 - Sum_{n >= 2} 1/(n*(n - 1)*n!^2);

c = 1 + Sum_{n >= 1} (n + 2)/(n!*(n + 1)!);

c = 5/3 + 1/3*Sum_{n >= 2} (n + 1)*(n + 2)/n!^2;

c = A070910 + A096789 - 1.

Continued fraction: c = 3 - 1/(8 - 4/(14 - 9/(32 - ... - (n-1)^2/(n^2 + n + 2 - ...)))). See comments in A141827. (End)

EXAMPLE

2.8702221569733963308194588658111996012403192622809957012...

MAPLE

evalf(BesselI(0, 2) + BesselI(1, 2) - 1, 100); # Peter Bala, Jul 02 2016

MATHEMATICA

First@ RealDigits@ N[Sum[1/Product[Ceiling[r/2], {r, n}], {n, 1000}], 100]) (* Original program amended to generate output by Michael De Vlieger, Jul 03 2016 *)

RealDigits[3 - HypergeometricPFQ[{1, 1}, {3, 3, 3}, 1]/8, 10, 100][[1]] (* Vaclav Kotesovec, Jul 03 2016 *)

CROSSREFS

Cf. A006784, A064648, A101689, A001405, A070910, A096789, A141827.

Sequence in context: A098221 A009214 A021781 * A134877 A085298 A011060

Adjacent sequences:  A130817 A130818 A130819 * A130821 A130822 A130823

KEYWORD

cons,easy,nonn

AUTHOR

Stephen Casey (hexomino(AT)gmail.com), Jul 17 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified May 26 20:43 EDT 2018. Contains 304644 sequences. (Running on oeis4.)