|
|
A096524
|
|
Numbers n such that n.0.n+1 is prime, where '.' represents concatenation. Or, n such that 10^(k+1)*n + n + 1 is prime, where k is the number of digits in n.
|
|
1
|
|
|
6, 8, 20, 36, 38, 42, 48, 50, 66, 72, 78, 96, 128, 140, 150, 152, 188, 212, 216, 218, 272, 296, 300, 318, 330, 336, 360, 366, 372, 386, 398, 408, 422, 446, 462, 482, 488, 492, 498, 542, 546, 552, 560, 570, 582, 608, 630, 638, 672, 678, 710, 716, 740, 756, 780
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[FromDigits[Join[IntegerDigits[#], {0}, IntegerDigits[ #]]]+1]&] (* Harvey P. Dale, Nov 17 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|