%I A072225
%S A072225 3,4,5,7,8,9,10,11,13,16,18,19,20,22,23,26,29,34,35,37,38,45,47,50,58,
%T A072225 60,61,62,64,68,69,70,75,77,79,80,83,87,88,90,91,94,95,97,101,113,116,
%U A072225 119,120,121,126,128,132,133,134
%N A072225 Numbers n such that Prime(n)+Prime(n+1)+Prime(n+2) is prime.
%e A072225 9 is in the sequence because prime(9)+prime(10)+prime(11)=23+29+31=83
is a prime.
%p A072225 a:=proc(n) if isprime(ithprime(n)+ithprime(n+1)+ithprime(n+2))=true then
n else fi end: seq(a(n),n=1..150); - Emeric Deutsch (deutsch(AT)duke.poly.edu),
Apr 24 2006
%t A072225 Select[Range[10^4], PrimeQ[Prime[ # ] + Prime[ # + 1] + Prime[ # + 2]]
&]
%Y A072225 Cf. A034962, A073681, A117673.
%Y A072225 Sequence in context: A078358 A152012 A039131 this_sequence A137689 A081690
A081688
%Y A072225 Adjacent sequences: A072222 A072223 A072224 this_sequence A072226 A072227
A072228
%K A072225 easy,nonn
%O A072225 1,1
%A A072225 Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Jul 04 2002
|