|
|
A104950
|
|
Primes from merging of 7 successive digits in decimal expansion of the Champernowne Constant.
|
|
1
|
|
|
4567891, 1112131, 1213141, 8394041, 4757677, 8798081, 8991001, 1111211, 1112113, 1211311, 1711811, 7118119, 3113213, 3413513, 5146147, 7148149, 9170171, 7417517, 7517617, 8919019, 9119219, 5196197, 7198199, 5206207
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Select[FromDigits/@Partition[Flatten[IntegerDigits/@Range[300]], 7, 1], PrimeQ], IntegerLength[#] == 7&] (* Vincenzo Librandi, Apr 24 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|