A104945 Primes from merging of 2 successive digits in decimal expansion of the Champernowne Constant.

23, 67, 89, 11, 11, 13, 31, 41, 61, 17, 71, 19, 23, 29, 31, 13, 23, 43, 53, 37, 73, 83, 41, 43, 47, 53, 59, 61, 67, 97, 71, 17, 73, 37, 47, 67, 79, 83, 89, 19, 29, 59, 97, 79, 89, 11, 31, 41, 61, 71, 11, 11, 11, 11, 11, 11, 13, 31, 11, 41, 11, 11, 61, 11, 17, 71, 11, 11, 19

Offset

1,1

Comments

Leading zeroes not permitted, i.e., the terms must be two-digit primes. - Harvey P. Dale, Sep 15 2017

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

The first 2,800 digits of the Champernowne Constant as calculated at WorldWideSchool.org.

Mathematica

Select[Select[FromDigits/@Partition[Flatten[IntegerDigits/@Range[200]], 2, 1], PrimeQ], IntegerLength[#] == 2&] (* Vincenzo Librandi, Apr 24 2013 *)
Select[FromDigits/@Partition[RealDigits[ChampernowneNumber[], 10, 400][[1]], 2, 1], IntegerLength[#]==2&&PrimeQ[#]&] (* Harvey P. Dale, Sep 15 2017 *)

Crossrefs

Cf. A033307.

Sequence in context: A051875 A125872 A228611 * A141849 A125873 A059241

Adjacent sequences: A104942 A104943 A104944 * A104946 A104947 A104948

Keyword

nonn,base

Author

Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005

Extensions

Changed offset from 0 to 1 by Vincenzo Librandi, Apr 24 2013

Status

approved