A079329

[Dean Hickerson]

I've sent edited versions of A079328 and A079329 to Neil.  See below.

Dean Hickerson
dean at math.ucdavis.edu

%I A079328
%S A079328 4,8,14,23,35,50,65,86,104,122,143,164,185,194,212,233,254,275,296,329,
%T A079328 383,425,446,491,545,584,608,629,650,734,815,824,842,869,950,1025,1040,
%U A079328 1055,1076,1121,1190,1253,1283,1295,1310,1373,1439,1466,1484,1547,1613
%N A079328 Let f(n)=A001359(n) be the smaller member of the n-th pair of twin primes.  Then a(n) is the average of f(n) and f(n+1).
%H A079328 E. W. Weisstein, <a href="http://mathworld.wolfram.com/TwinPrimes.html">Twin Primes</a>
%t A079328 s=Select[Range[2000],PrimeQ[ # ]&&PrimeQ[ #+2]&];(Drop[s,1]+Drop[s,-1])/2
%Y A079328 Cf. A001359, A079329.
%K A079328 nonn,new
%O A079328 1,1
%A A079328 Vincenzo Origlio (vincenzo.origlio at itc.cnr.it), Feb 13 2003
%E A079328 Edited by Dean Hickerson (dean at math.ucdavis.edu), Feb 14 2003

%I A079329
%S A079329 6,10,16,25,37,52,67,88,106,124,145,166,187,196,214,235,256,277,298,
%T A079329 331,385,427,448,493,547,586,610,631,652,736,817,826,844,871,952,1027,
%U A079329 1042,1057,1078,1123,1192,1255,1285,1297,1312,1375,1441,1468,1486,1549
%N A079329 Let g(n)=A006512(n) be the larger member of the n-th pair of twin primes.  Then a(n) is the average of g(n-1) and g(n).
%N A079329 Consecutive greater of twin primes average.
%H A079329 E. W. Weisstein, <a href="http://mathworld.wolfram.com/TwinPrimes.html">Twin Primes</a>
%t A079329 s=Select[Range[2000],PrimeQ[ # ]&&PrimeQ[ #-2]&];(Drop[s,1]+Drop[s,-1])/2
%Y A079329 Cf. A006512, A079328.
%K A079329 nonn,new
%O A079329 1,1
%A A079329 Vincenzo Origlio (vincenzo.origlio at itc.cnr.it), Feb 13 2003
%E A079329 Edited by Dean Hickerson (dean at math.ucdavis.edu), Feb 14 2003