|
%I #27 Dec 14 2014 02:07:58
%S 789101,728293,869707,889909,102103,108109,911011,101111,111121,
%T 111211,711811,120121,201211,231241,251261,126127,261271,281291,
%U 913013,113213,321331,351361,138139,401411,411421,431441,471481,491501,150151,501511
%N Primes from merging of 6 successive digits in decimal expansion of the Champernowne Constant.
%C Initial zeros are not permitted, i.e., the resulting primes must be six digits in length. - _Harvey P. Dale_, Jul 18 2011
%H Vincenzo Librandi, <a href="/A104949/b104949.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[500]], 6,1], PrimeQ], IntegerLength[#]==6&] (* _Harvey P. Dale_, Jul 18 2011 *)
%Y Cf. A007376, A033307.
%K nonn,base
%O 1,1
%A Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
|
