OFFSET

1,1

COMMENTS

This sequence consists of all the primes that are not in A270997. - Bill McEachen, Feb 16 2022

FORMULA

EXAMPLE

37 is prime and congruent to -2 (mod 13), so 37 is a term.

MATHEMATICA

For[a = 1, a < 1001, a++, p = Prime[a]; t = Mod[p, 13]; If[Or[t == 1, t == 3, t == 4, t == 9, t == 10, t == 12] == False, Print[p]]]

Select[Prime[Range[110]], !MemberQ[{1, 3, 4, 9, 10, 12}, Mod[#, 13]]&] (* Harvey P. Dale, May 12 2019 *)

PROG

(PARI) select( {is_A120330(n)=!bittest(5658, n%13)&&isprime(n)}, [0..567]) \\ M. F. Hasler, Feb 17 2022

CROSSREFS

KEYWORD

easy,nonn

AUTHOR

Neil Fernandez, Jun 22 2006

EXTENSIONS

Corrected by N. J. A. Sloane, May 12 2019 at the suggestion of Harvey P. Dale

STATUS

approved