login
A084551
Primes which are a concatenation of five consecutive numbers.
3
1516171819, 3940414243, 5758596061, 6566676869, 7778798081, 8384858687, 8990919293, 129130131132133, 153154155156157, 197198199200201, 213214215216217, 239240241242243, 269270271272273, 387388389390391, 399400401402403, 443444445446447, 459460461462463
OFFSET
1,1
LINKS
MATHEMATICA
Select[Table[FromDigits[Flatten[IntegerDigits[n+Range[-2, 2]]]], {n, 2, 500}], PrimeQ] (* Jayanta Basu, May 24 2013 *)
Select[FromDigits[Flatten[IntegerDigits[#]]]&/@Partition[Range[600], 5, 1], PrimeQ] (* Harvey P. Dale, Nov 11 2014 *)
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Jun 27 2003
STATUS
approved