The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A285407 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A285407

G.f.: 1/(1 - x^2/(1 - x^3/(1 - x^5/(1 - x^7/(1 - x^11/(1 - ... - x^prime(k)/(1 - ... ))))))), a continued fraction.
(history; published version)

#13 by Vaclav Kotesovec at Fri Aug 25 03:25:51 EDT 2017

STATUS

editing

approved

#12 by Vaclav Kotesovec at Fri Aug 25 03:25:41 EDT 2017

FORMULA

a(n) ~ c * d^n, where d = 1.3864622092472465020397266918102624708859968795203700659786636158522760956... and c = 0.15945087310540003725148530084775272562567007586487061850065597143186... - Vaclav Kotesovec, Aug 25 2017

STATUS

approved

editing

#11 by Bruno Berselli at Fri Apr 21 04:37:31 EDT 2017

STATUS

reviewed

approved

#10 by Joerg Arndt at Fri Apr 21 04:10:04 EDT 2017

STATUS

proposed

reviewed

#9 by Robert Israel at Thu Apr 20 20:16:06 EDT 2017

STATUS

editing

proposed

#8 by Robert Israel at Thu Apr 20 20:16:00 EDT 2017

MAPLE

R:= 1; :

#7 by Robert Israel at Thu Apr 20 20:15:02 EDT 2017

MAPLE

C:= numtheory:-cfrac([0, [1, 1], seq([-x^ithprime(i), 1], i=1..15)]):

R:= 1;

for i from numtheory:-pi(50) to 1 by -1 do

S R:= series(C, 1-x^ithprime(i)/R, x, 51):;

od:

R:= series(1/R, x, 51):

seq(coeff(S, R, x, j), j=0..50); # Robert Israel, Apr 20 2017

#6 by Robert Israel at Thu Apr 20 20:13:06 EDT 2017

LINKS

Robert Israel, <a href="/A285407/b285407.txt">Table of n, a(n) for n = 0..5000</a>

#5 by Robert Israel at Thu Apr 20 19:54:28 EDT 2017

MAPLE

C:= numtheory:-cfrac([0, [1, 1], seq([-x^ithprime(i), 1], i=1..15)]):

S:= series(C, x, 51):

seq(coeff(S, x, j), j=0..50); # Robert Israel, Apr 20 2017

STATUS

approved

editing

#4 by N. J. A. Sloane at Tue Apr 18 15:37:54 EDT 2017

STATUS

proposed

approved