OFFSET
1,1
COMMENTS
Subsequence of A067838.
LINKS
Colin Barker, Table of n, a(n) for n = 1..1000
EXAMPLE
823 is in the sequence because 823 % 100 = 23, prime(823) = 6323 and 6323 % 100 = 23.
MATHEMATICA
Select[Prime@ Range@ 1620, Mod[#, 100] == Mod[Prime@ #, 100] &] (* Michael De Vlieger, Mar 29 2016 *)
PROG
(PARI) L=List(); forprime(p=2, 20000, if(p%100==prime(p)%100, listput(L, p))); Vec(L)
(Python)
from sympy import isprime, prime
for p in range(2, 20000):
if(prime(p)%100==p%100 and isprime(p)):print(p)
#, Soumil Mandal, Apr 06 2016
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Colin Barker, Mar 29 2016
STATUS
approved