OFFSET
1,1
COMMENTS
Average of two consecutive lesser of twin primes. - Juri-Stepan Gerasimov, Aug 26 2011.
LINKS
Eric Weisstein's World of Mathematics, Twin Primes
MATHEMATICA
s=Select[Range[2000], PrimeQ[ # ]&&PrimeQ[ #+2]&]; (Drop[s, 1]+Drop[s, -1])/2
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Origlio (vincenzo.origlio(AT)itc.cnr.it), Feb 13 2003
EXTENSIONS
Edited by Dean Hickerson, Feb 14 2003
STATUS
approved