A104948 - OEIS

%I #14 Apr 30 2013 03:18:07

%S 67891,89101,10111,11213,15161,52627,29303,30313,33343,35363,36373,

%T 14243,54647,70717,75767,76777,98081,58687,78889,89909,93949,96979,

%U 21031,41051,51061,71081,10111,12113,11311,11411,18119,22123,11321

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

%H Vincenzo Librandi, <a href="/A104948/b104948.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]], 5, 1], PrimeQ], IntegerLength[#] == 5&] (* _Vincenzo Librandi_, Apr 24 2013 *)

%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