|
|
A108111
|
|
Numbers k such that the string 2931k is prime.
|
|
0
|
|
|
1, 23, 29, 47, 49, 73, 77, 79, 101, 113, 127, 151, 161, 167, 193, 197, 209, 211, 217, 221, 223, 241, 289, 307, 319, 413, 421, 427, 433, 443, 457, 493, 503, 527, 553, 569, 583, 587, 619, 629, 637, 647, 653, 671, 683, 707, 713, 739
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
k=1 is in the sequence because 2931k = 29311 is a prime number.
k=113 is in the sequence because 2931k = 2931113 is a prime number.
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[#+2931 10^IntegerLength[#]]&] (* Harvey P. Dale, Sep 16 2011 *)
|
|
PROG
|
(Magma) [ n: n in [1..750] | IsPrime(Seqint(Intseq(n) cat [1, 3, 9, 2])) ]; // Vincenzo Librandi, Feb 02 2011
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|