OFFSET
1,1
MAPLE
A268860:=n->`if`(isprime(n) and n mod 100 = 27, n, NULL): seq(A268860(n), n=1..5*10^4); # Wesley Ivan Hurt, Apr 02 2016
MATHEMATICA
Select[Table[27 + 100 i, {i, 0, 10^3}], ProvablePrimeQ[#] &]
PROG
(Magma) [n: n in PrimesUpTo(15000) | n mod 100 eq 27]; // Vincenzo Librandi, Feb 15 2016
(PARI) lista(nn) = {forprime(p=2, nn, if ((p-27) % 100 == 0, print1(p, ", ")); ); } \\ Michel Marcus, Feb 20 2016
(Python)
from sympy import isprime
for n in range(127, 10000, 100):
if(isprime(n)):print(n)
# Soumil Mandal, Apr 02 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Soumadeep Ghosh, Feb 14 2016
STATUS
approved