The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A104945 Primes from merging of 2 successive digits in decimal expansion of the Champernowne Constant. 2

%I #20 Sep 15 2017 11:57:18

%S 23,67,89,11,11,13,31,41,61,17,71,19,23,29,31,13,23,43,53,37,73,83,41,

%T 43,47,53,59,61,67,97,71,17,73,37,47,67,79,83,89,19,29,59,97,79,89,11,

%U 31,41,61,71,11,11,11,11,11,11,13,31,11,41,11,11,61,11,17,71,11,11,19

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

%C Leading zeroes not permitted, i.e., the terms must be two-digit primes. - _Harvey P. Dale_, Sep 15 2017

%H Vincenzo Librandi, <a href="/A104945/b104945.txt">Table of n, a(n) for n = 1..1000</a>

%H The first <a href="http://www.worldwideschool.org/library/books/sci/math/MiscellaneousMathematicalConstants/chap12.html">2,800 digits of the Champernowne Constant</a> as calculated at WorldWideSchool.org.

%t Select[Select[FromDigits/@Partition[Flatten[IntegerDigits/@Range[200]], 2, 1], PrimeQ], IntegerLength[#] == 2&] (* _Vincenzo Librandi_, Apr 24 2013 *)

%t Select[FromDigits/@Partition[RealDigits[ChampernowneNumber[],10,400][[1]],2,1],IntegerLength[#]==2&&PrimeQ[#]&] (* _Harvey P. Dale_, Sep 15 2017 *)

%Y Cf. A033307.

%K nonn,base

%O 1,1

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

%E Changed offset from 0 to 1 by _Vincenzo Librandi_, Apr 24 2013

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 2 22:30 EDT 2023. Contains 365841 sequences. (Running on oeis4.)