A154730 Decimal expansion of 1 minus the Copeland-Erdős constant.

7, 6, 4, 2, 8, 8, 8, 6, 8, 2, 8, 0, 7, 6, 7, 0, 6, 8, 6, 2, 5, 8, 5, 6, 5, 2, 4, 6, 4, 0, 3, 8, 3, 2, 2, 8, 2, 6, 2, 0, 1, 6, 1, 0, 0, 2, 8, 9, 8, 8, 9, 6, 8, 9, 2, 8, 9, 0, 8, 8, 6, 8, 7, 2, 8, 6, 8, 8, 6, 2, 8, 6, 0, 8, 5, 0, 8, 4, 8, 8, 4, 2, 8, 3, 6, 8, 3, 2, 8, 2, 6, 8, 2, 0, 8, 1, 8, 8, 0, 8, 8

Offset

0,1

Links

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

Example

0.76428886828076706862585652464038322826201610028988...

Mathematica

seq[np_] := With[{v = Flatten[IntegerDigits[Prime[Range[np]]]]}, ConstantArray[9, Length[v]] - v]; seq[45] (* Amiram Eldar, Mar 26 2026 *)

Crossrefs

Cf. A033308.

Sequence in context: A131184 A392340 A021933 * A242967 A228628 A131266

Adjacent sequences: A154727 A154728 A154729 * A154731 A154732 A154733

Keyword

cons,nonn,base

Author

Omar E. Pol, Jan 28 2009

Extensions

More digits from R. J. Mathar and Dmitry Kamenetsky, Feb 06 2009

Status

approved