|
%I #11 Sep 26 2013 08:41:13
%S 47,167,251,257,503,557,587,647,941,971,1097,1181,1217,1361,1493,1499,
%T 1889,1901,1907,2063,2393,2399,2411,2441,2897,2957,3191,3797,4007,
%U 4073,4373,4391,4397,4451,4457,4673,4679,4691,4871,5081,5237,5261,5297,5351,5381,5387,5801,6257,6311,6317,6857,6911,6971,7001,7079
%N First of a run of 3 or more consecutive primes which are congruent to 2 (mod 3).
%C The subsequence of terms A185935(k) such that nextprime(A185935(k))=A185935(k+1). If nextprime(a(n))=a(n+1), then a(n) is in A185941.
%o (PARI) s=Mod([2,2,2],3);o=vector(#s);i=0;forprime( p=1,1e4, o[i++%3+1]=p; o-s | print1( o[(i+1)%3+1]","))
%Y Cf. A185936.
%K nonn
%O 1,1
%A _M. F. Hasler_, Feb 06 2011
|
