OFFSET
1,2
COMMENTS
k such that 100*k+11 is prime. - Robert Israel, Jul 30 2015
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
Chris Caldwell, The first 1,000 primes.
EXAMPLE
If k=2, then k11 = 211 (prime);
If k=50, then k11 = 5011 (prime);
If k=98, then k11 = 9811 (prime).
MAPLE
select(t -> isprime(100*t+11), [$0..1000]); # Robert Israel, Jul 30 2015
MATHEMATICA
Select[ Range[0, 215], PrimeQ[ FromDigits[ Flatten[ IntegerDigits /@ { #, 1, 1}]]] &] (* Robert G. Wilson v, Feb 21 2005 *)
Select[Range[0, 250], PrimeQ[100#+11]&] (* Harvey P. Dale, Oct 11 2018 *)
PROG
(Magma) [n: n in [0..250] | IsPrime(Seqint(Intseq(11) cat Intseq(n)))]; // Vincenzo Librandi, Jul 31 2015
(Magma) [n: n in [0..240] |IsPrime(100*n+11)]; // Vincenzo Librandi, Jul 31 2015
(PARI) is(n)=isprime(100*n+11) \\ Charles R Greathouse IV, Feb 20 2017
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Parthasarathy Nambi, Jan 30 2005, Feb 18 2005
EXTENSIONS
Corrected and extended by Robert G. Wilson v, Feb 21 2005
STATUS
approved