|
| |
|
|
A104952
|
|
Primes from merging of 9 successive digits in decimal expansion of the Champernowne Constant.
|
|
2
|
|
|
|
728293031, 282930313, 343536373, 940414243, 727374757, 778798081, 586878889, 596979899, 798991001, 899100101, 810911011, 911011111, 720820921, 736836937, 937037137, 939039139, 850951051, 951051151, 756856957, 973073173, 876977077
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
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[600]], 9, 1], PrimeQ], IntegerLength[#] == 9 &] (*Vincenzo Librandi, Apr 24 2013
Select[FromDigits/@Partition[RealDigits[ChampernowneNumber[], 10, 3000][[1]], 9, 1], IntegerLength[#]==9&&PrimeQ[#]&] (* Harvey P. Dale, May 02 2019 *)
|
|
|
CROSSREFS
|
Cf. A033307.
Sequence in context: A086041 A244186 A035518 * A015370 A068725 A104932
Adjacent sequences: A104949 A104950 A104951 * A104953 A104954 A104955
|
|
|
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
|
| |
|
|
