OFFSET
1,1
COMMENTS
The asymptotic density of this sequence is 1/4 (by Dirichlet's theorem). - Amiram Eldar, Mar 02 2021
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
MAPLE
res:= NULL: p:= 2:
for m from 2 to 1000 do
p:= nextprime(p);
if p mod 12 = 5 then res:= res, m fi;
od:
res; # Robert Israel, Dec 26 2016
MATHEMATICA
Select[{#, Prime[#]}& /@ Range[500], Mod[#[[2]], 12] == 5&] [[All, 1]] (* Jean-François Alcover, Mar 23 2019 *)
Select[Range[300], Mod[Prime[#], 12]==5&] (* Harvey P. Dale, Mar 18 2023 *)
PROG
(PARI) for(n=1, 999, prime(n)%12==5 & print1(n", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, May 21 2009
STATUS
approved