%I #16 Nov 21 2013 12:49:08
%S 1,9,13,17,21,29,33,37,41,49,53,57,61,69,73,77,81,89,93,97
%N Last two digits of primes of form 4n+1 (A002144), excluding 5. Leading 0's omitted.
%t Select[Union[Mod[#,100]&/@Select[4Range[200]+1,PrimeQ]], #!=5&] (* _Harvey P. Dale_, Apr 02 2011 *)
%Y Cf. A002144.
%K fini,full,nonn,base
%O 1,2
%A _Lekraj Beedassy_, Jan 19 2008