OFFSET
1,1
COMMENTS
Or, primes p == {9, 14, 15, 22, 23, 28} (mod 37).
Corresponding values p^2 (mod 37): 11, 3, 7, 3, 11, 7, 7, 3, 11, 3, 3, 11, 7, 11, 11, 3, 7.
FORMULA
a(n) ~ 6n log n. - Charles R Greathouse IV, May 10 2013
EXAMPLE
23^2 = 529 and 529 mod 37 = 11 (prime).
MATHEMATICA
Select[Prime[Range[2400]], PrimeQ[PowerMod[#, 2, 37]] &]
PROG
(PARI) forprime (p = 2, 2351, isprime (p^2 %37) & print1 (p ", "))
(Magma) [p: p in PrimesUpTo(3000) | IsPrime(p^2 mod 37)]; // Bruno Berselli, May 10 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Zak Seidov, May 10 2013
STATUS
approved