login
A032708
Numbers k such that k prefixed by '8' and followed by '1' is prime.
0
1, 2, 8, 10, 11, 16, 17, 19, 22, 23, 29, 31, 43, 46, 50, 52, 58, 64, 68, 73, 74, 76, 82, 83, 86, 94, 95, 97, 100, 103, 104, 107, 110, 113, 118, 128, 133, 137, 140, 142, 155, 161, 167, 170, 176, 190, 193, 197, 202, 203, 205, 214, 217, 223, 224, 226, 230, 235
OFFSET
1,2
MATHEMATICA
Select[Range[250], PrimeQ[FromDigits[Join[{8}, IntegerDigits[#], {1}]]]&] (* Harvey P. Dale, Mar 24 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, May 15 1998
EXTENSIONS
Offset changed by Andrew Howroyd, Aug 11 2024
STATUS
approved