OFFSET
1,2
COMMENTS
Leading zeros in k are not permitted; cases like k=013 relating to the prime 1117013 are not in the sequence.
EXAMPLE
k=1 and k=79 are in the sequence because 1117k = 11171 and 1117k=111779 are prime.
MATHEMATICA
Select[Range[700], PrimeQ[FromDigits[Join[{1, 1, 1, 7}, IntegerDigits[ #]]]]&] (* Harvey P. Dale, Sep 13 2011 *)
PROG
(Magma) [ n: n in [1..700] | IsPrime(Seqint(Intseq(n) cat [7, 1, 1, 1])) ]; // Vincenzo Librandi, Feb 02 2011
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Parthasarathy Nambi, Jun 25 2005
STATUS
approved