A225139 Primes from merging of 10 successive digits in the decimal expansion of the Champernowne constant.

1234567891, 9101112131, 1516171819, 3343536373, 3940414243, 5758596061, 6566676869, 6676869707, 7778798081, 8384858687, 8990919293, 1021031041, 1081091101, 1091101111, 1311411511, 1141151161, 1411511611, 1171181191, 1181191201, 1221231241, 1361371381

Offset

1,1

Comments

Leading zeros are not permitted, so each prime is 10 digits in length. The terms are listed in the order in which they occur.

Links

Bruno Berselli, Table of n, a(n) for n = 1..1000

Simon Plouffe, Champernowne constant to 2890 digits

Mathematica

With[{len = 10}, FromDigits /@ Select[Partition[RealDigits[ChampernowneNumber[10], 10, 400][[1]], len, 1], PrimeQ[FromDigits[#]] && IntegerLength[FromDigits[#]] == len &]]
Select[FromDigits/@Partition[RealDigits[ChampernowneNumber[], 10, 1000][[1]], 10, 1], PrimeQ[#]&&IntegerLength[#]==10&] (* Harvey P. Dale, Dec 01 2018 *)

Crossrefs

Cf. A033307, A104945 - A104952.

Cf. A104953.

Sequence in context: A162324 A235640 A104953 * A176942 A154769 A187565

Adjacent sequences: A225136 A225137 A225138 * A225140 A225141 A225142

Keyword

nonn,base

Author

Bruno Berselli, Apr 30 2013

Status

approved