OFFSET
1,1
COMMENTS
The asymptotic density of this sequence is 1/6 (by Dirichlet's theorem). - Amiram Eldar, Mar 02 2021
EXAMPLE
a(1) = 8 because prime(8) = 19 and 19 == 1 (mod 9).
MATHEMATICA
Select[Range[400], Mod[Prime[#], 9] == 1 &]
PROG
(Magma) [n: n in [1..500] | NthPrime(n) mod 9 eq 1];
(PARI) lista(nn) = for(n=1, nn, if(Mod(prime(n), 9)==1, print1(n, ", "))); \\ Altug Alkan, Mar 04 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Mar 04 2016
STATUS
approved