login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo

Please make a donation to keep the OEIS running. We are now in our 56th year. In the past year we added 10000 new sequences and reached almost 9000 citations (which often say "discovered thanks to the OEIS").
Other ways to donate

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A078506 Decimal expansion of sum of inverses of unrestricted partition function. 6
2, 5, 1, 0, 5, 9, 7, 4, 8, 3, 8, 8, 6, 2, 9, 3, 9, 5, 3, 2, 3, 6, 8, 3, 4, 7, 2, 7, 4, 1, 5, 4, 6, 5, 4, 5, 1, 6, 8, 3, 5, 3, 1, 9, 4, 4, 9, 5, 5, 1, 4, 7, 6, 8, 1, 9, 0, 8, 0, 6, 2, 9, 9, 6, 5, 0, 8, 3, 8, 4, 5, 3, 2, 9, 0, 4, 4, 6, 1, 8, 4, 2, 3, 8, 1, 9, 2, 5, 8, 7, 1, 4, 6, 2, 8, 2, 7, 8, 0, 9 (list; constant; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

One could just as well sum from n >= 0, giving a value one higher. - Franklin T. Adams-Watters, Nov 30 2018

LINKS

Vaclav Kotesovec, Table of n, a(n) for n = 1..1000

FORMULA

Sum_{n>=1} 1/A000041(n) = 2.510597483886...

EXAMPLE

2.510597483886293953236834727415465451683531944955147681908...

MATHEMATICA

digits = 100; NSum[1/PartitionsP[n], {n, 1, Infinity}, NSumTerms -> 10000, WorkingPrecision -> digits+1] // RealDigits[#, 10, digits]& // First (* Jean-François Alcover, Feb 21 2014 *)

PROG

(PARI)

default(realprecision, 100);

N=10000;  x='x+O('x^N);

v=Vec(Ser( 1/eta(x) ) );

s=sum(n=2, #v, 1.0/v[n] )

(PARI) {a(n) = if( n<-1, 0, n++; default( realprecision, n+5); floor( suminf( k=1, 1 / numbpart(k)) * 10^n) % 10)} /* Michael Somos, Feb 05 2011 */

CROSSREFS

Cf. A000041, A237515, A303662.

Sequence in context: A329251 A062627 A011217 * A323909 A124779 A284750

Adjacent sequences:  A078503 A078504 A078505 * A078507 A078508 A078509

KEYWORD

cons,nonn

AUTHOR

Ralf Stephan, Jan 05 2003

EXTENSIONS

Corrected digits from position 32 on by Ralf Stephan, Jan 24 2011

More terms from Jean-François Alcover, Feb 21 2014

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified December 2 16:46 EST 2020. Contains 338877 sequences. (Running on oeis4.)