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

 

Logo

Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 5000 articles have referenced us, often saying "we discovered this result with the help of the OEIS".

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A030168 Continued fraction for Copeland-Erdős constant 0.235711... (concatenate primes). 13
0, 4, 4, 8, 16, 18, 5, 1, 1, 1, 1, 7, 1, 1, 6, 2, 9, 58, 1, 3, 4, 2, 2, 1, 1, 2, 1, 4, 39, 4, 4, 5, 2, 1, 1, 87, 16, 1, 2, 1, 2, 1, 1, 3, 1, 8, 1, 3, 1, 1, 6, 1, 13, 27, 1, 1, 3, 1, 41, 1, 2, 1, 1, 19, 1, 1, 1, 1, 3, 1, 1, 484, 1, 4, 1, 19, 3, 6, 8, 1, 5, 1, 17, 9, 2, 3, 5, 25, 1468, 1, 1, 3, 1 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

M. F. Hasler, Table of n, a(n) for n = 0..5000

G. Xiao, Contfrac

Eric Weisstein's World of Mathematics, Copeland-Erdős Constant

Index entries for continued fractions for constants

EXAMPLE

0.23571113171923293137414347... = 0 + 1/(4 + 1/(4 + 1/(8 + 1/(16 + ...))))

MATHEMATICA

Take[ ContinuedFraction@ FromDigits[{Flatten[ IntegerDigits[ Prime@Range@ 47]], 0}], 95] (* Robert G. Wilson v, Oct 17 2013 *)

PROG

(PARI)

s=concat(vector(2000, i, Str(prime(i)))); c=contfrac(eval(s)/10^#s);

c2=contfrac((eval(s)+10^9)/10^#s);

for(i=1, #c, c[i]!=c2[i] & return(Str("Terms may be wrong for n>="i-1));

write("b030168.txt", i-1, " ", c[i])) \\ M. F. Hasler, Oct 13 2009

(PARI) { default(realprecision, 2100); x=0.0; m=0; forprime (p=2, 4000, n=1+floor(log(p)/log(10)); x=p+x*10^n; m+=n; ); x=contfrac(x/10^m); for (n=1, 2001, write("b030168.txt", n-1, " ", x[n])); } \\ Harry J. Smith, Apr 30 2009

CROSSREFS

Cf. A033308 (decimal expansion), A072754 (numerators of convergents), A072755 (denominators of convergents).

Sequence in context: A095294 A190100 A244421 * A261212 A112435 A232508

Adjacent sequences:  A030165 A030166 A030167 * A030169 A030170 A030171

KEYWORD

nonn,cofr,base

AUTHOR

Eric W. Weisstein

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 December 8 22:49 EST 2016. Contains 278957 sequences.