A134441 Last two digits of primes of form 4n+1 (A002144), excluding 5. Leading 0's omitted.
1, 9, 13, 17, 21, 29, 33, 37, 41, 49, 53, 57, 61, 69, 73, 77, 81, 89, 93, 97
Offset: 1
Crossrefs
Cf. A002144.
Programs
-
Mathematica
Select[Union[Mod[#,100]&/@Select[4Range[200]+1,PrimeQ]], #!=5&] (* Harvey P. Dale, Apr 02 2011 *)