%I #5 Jul 15 2012 09:38:56
%S 151,199,367,523,601,727,991,1063,1117,1231,1453,1531,1741,1747,1753,
%T 1759,2161,2281,2671,3049,3061,3169,3301,3307,3499,3631,3727,4093,
%U 4159,4423,4549,4591,4597,4651,4987,5101,5107,5197,5419,5557,5743,5821,6067,6361,6367,6397,6607,6661,7351,7369,7393,7951,8179,8311
%N First of a run of 3 or more consecutive primes which all equal 1 (mod 3).
%C A subsequence of A185934.
%o (PARI) s=Mod([1,1,1],3); o=vector(3); i=0; forprime( p=1,1e4, o[i++%3+1]=p; o-s | print1( o[(i+1)%3+1]","))
%K nonn
%O 1,1
%A _M. F. Hasler_, Feb 06 2011
|