A071775 Continued fraction for C = 0.23571379....the concatenation of final decimal digits of primes.

0, 4, 4, 8, 103, 1, 1, 1, 1, 1, 3, 1, 2, 47, 1, 1, 2, 3, 1, 1, 1, 2, 2, 5, 1, 11, 2, 2, 8, 1, 7, 1, 19, 1, 1, 1, 1, 105, 1, 4, 12, 1, 1, 1, 3, 4, 1, 2, 4, 3, 3, 1, 1, 4, 1, 4, 3, 8, 4, 2, 1, 3, 5, 1, 1, 3, 28, 1, 3, 2, 1, 1, 1, 4, 1, 2, 2, 1, 32, 1, 8, 2, 2, 11, 1, 7, 1, 2, 5, 2, 1, 1, 2, 3, 1, 1, 1, 1

Offset: 1

Author

Benoit Cloitre, Jun 24 2002

Keywords

• base
• cofr
• easy
• nonn

Crossrefs

Cf. A007652.

Programs

Mathematica

With[{c=FromDigits[NumberDigit[#,0]&/@ Prime[ Range[ 500]]]}, ContinuedFraction[ c/10^IntegerLength[c]]] (* Requires Mathematica version 12 or later *) (* Harvey P. Dale, Jul 03 2021 *)

PARI

\p200 contfrac(sum(n=0,100,(prime(n)%10)*10^-n))