%I A072162
%S A072162 2,3,13,173,769,1627,6053,24281,18574499,18574519,18574657,136197419,
%T A072162 7348138997,27788573777,204475054739,773853721099
%N A072162 (Prime(n)+prime(n+1)+prime(n+2))/(n+1) is an integer; sequence gives 
               prime(n).
%C A072162 a(17) > 10^12. [From Donovan Johnson (donovan.johnson(AT)yahoo.com), 
               Oct 24 2009]
%e A072162 (13+17+19)/7 is an integer, 13 is the sixth prime so we divide by 7.
%t A072162 Prime[ Select[ Range[9*10^7], IntegerQ[(Prime[ # ] + Prime[ # + 1] + 
               Prime[ # + 2])/(# + 1)] & ]]
%Y A072162 Sequence in context: A153888 A068083 A137459 this_sequence A113785 A118323 
               A113494
%Y A072162 Adjacent sequences: A072159 A072160 A072161 this_sequence A072163 A072164 
               A072165
%K A072162 nonn
%O A072162 1,1
%A A072162 Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 27 2002
%E A072162 a(13)-a(16) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Oct 
               24 2009