|
|
A262193
|
|
Primes that are a concatenation of ten consecutive numbers.
|
|
0
|
|
|
45678910111213, 20212223242526272829, 68697071727374757677, 88899091929394959697, 122123124125126127128129130131, 140141142143144145146147148149, 188189190191192193194195196197, 200201202203204205206207208209, 212213214215216217218219220221
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
4_5_6_7_8_9_10_11_12_13 is a prime number.
|
|
MATHEMATICA
|
Select[FromDigits[Flatten[IntegerDigits[#]]]&/@Partition[Range[300], 10, 1], PrimeQ] (* Vincenzo Librandi, Sep 15 2015 *)
|
|
PROG
|
(PARI) for(n=1, 1e3, if(isprime(k=eval(Str(n, n+1, n+2, n+3, n+4, n+5, n+6, n+7, n+8, n+9))), print1(k", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|