|
%I #62 Feb 13 2023 08:59:00
%S 1234567891,12345678910111,123456789101112131415161
%N Champernowne primes.
%C Primes formed from an initial portion 1234... of the infinite string 12345678910111213... of the concatenation of all positive integers (decimal digits of the Champernowne constant).
%C From _Eric W. Weisstein_, Jul 15 2013: (Start)
%C The next terms are too big to display:
%C a(4) = 123456789...1121131141 (235 digits)
%C a(5) = 123456789...6896997097 (2804 digits)
%C a(6) = 12345...13611362136313 (4347 digits)
%C a(7) = 123456789...9709971097 (37735 digis)
%C a(8) has more than 37800 digits. (End)
%C a(8) has more than 140000 digits. - _Tyler Busby_, Feb 12 2023
%D R. W. Stephan, Factors and primes in two Smarandache sequences.
%H Eric W. Weisstein, <a href="/A176942/b176942.txt">Table of n, a(n) for n = 1..6</a>
%H Eric W. Weisstein, <a href="/A176942/a176942.txt">Table of n, a(n) for n = 1..7</a> (an a-file)
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/ChampernowneConstant.html">Champernowne Constant</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/ConstantPrimes.html">Constant Primes</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/IntegerSequencePrimes.html">Integer Sequence Primes</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/SmarandachePrime.html">Smarandache Prime</a>
%t With[{no=500},FromDigits/@Select[Table[Take[Flatten[IntegerDigits/@Range[no]],n],{n,no}],PrimeQ[FromDigits[#]]&]] (* _Harvey P. Dale_, Feb 06 2011 *)
%t Select[Table[Floor[N[ChampernowneNumber[10], n]*10^n], {n, 24}], PrimeQ] (* _Arkadiusz Wesolowski_, May 10 2012 *)
%Y Cf. A007908, A058183, A073175, A053546.
%Y Cf. A007376 (infinite Barbier word = almost-natural numbers: write n in base 10 and juxtapose digits).
%Y Cf. A033307 (decimal expansion of Champernowne constant).
%Y Cf. A071620 (number of digits in the n-th Champernowne prime).
%Y See A265043 for where to end the string of numbers that are being concatenated in order to get the n-th prime.
%K base,nonn
%O 1,1
%A _Marco Ripà_, Jan 27 2011
| 