A180951 - OEIS

%I #4 Oct 20 2014 12:24:56

%S 5,7,11,13,17,23,29,37,41,43,47,53,59,67,71,83,89,97,101,103,107,109,

%T 113,131,139,149,151,157,163,167,173,179,181,191,193,197,199,211,223,

%U 227,233,239,251,257,263,269,277,281,283,293,307,311,313,337,347,353

%N Primes such that p(i)+p(i+1)+p(i+2) is a prime when all addends are taken modulo 10.

%C Is also the sum of last digit of three consecutive primes resulting in a prime.

%H Harvey P. Dale, <a href="/A180951/b180951.txt">Table of n, a(n) for n = 1..1000</a>

%e a(5)=17 since 17 (mod10)+ 19 (mod 10)+ 23 (mod 10)= 7+9+3=19 is a prime.

%t Transpose[Select[Partition[Prime[Range[100]],3,1],PrimeQ[ Total[ Mod[ #,10]]]&]] [[1]] (* _Harvey P. Dale_, Oct 20 2014 *)

%Y Cf. A000040

%K nonn

%O 1,1

%A _Carmine Suriano_, Sep 27 2010