|
%I #6 Nov 04 2015 11:44:42
%S 271,464,682,829,1853,2086,2209,3253,3303,5463,6386,7064,7620,7918,
%T 8145,8631,8828,9243,10052,10074,10329,11257,11368,12223,13100,13359,
%U 14105,15751,16909,18481,19455,20332,20456,22213,23071,24510,24874,25420,25595,26233
%N Numbers n such that p(n),p(n)+6,p(n)+12,p(n)+18 are consecutive primes and p(n)=6*k+1 for some k, where p(n) denotes n-th prime.
%H Harvey P. Dale, <a href="/A090838/b090838.txt">Table of n, a(n) for n = 1..1000</a>
%e p(271)=1741: 1741,1747,1753,1759 are consecutive primes,1747=1741+6,1753=1741+12,1759=1741+18 and 1741=6*290+1
%t PrimePi/@Transpose[Select[Partition[Prime[Range[50000]],4,1], Differences[ #] == {6,6,6}&&Mod[#[[1]],6]==1&]][[1]] (* _Harvey P. Dale_, Nov 04 2015 *)
%Y Cf. A033451, A090832, A090833, A090834, A090835, A090836, A090837, A090839.
%K easy,nonn
%O 1,1
%A _Pierre CAMI_, Dec 09 2003
%E More terms from _Harvey P. Dale_, Nov 04 2015
|
