The OEIS is supported by the many generous donors to the OEIS Foundation.

Average of n-th twin prime pair minus total number of prime factors of average of n-th twin prime pair.

0

`%I #8 Nov 21 2013 12:50:03
`

`%S 2,4,9,15,27,39,56,67,99,103,135,146,175,185,194,224,234,265,279,307,
`

`%T 344,415,425,458,518,566,594,615,639,655,804,819,823,854,877,1015,
`

`%U 1027,1045,1058,1087,1143,1226,1274,1286,1298,1314,1423,1447,1478,1482,1603
`

`%N Average of n-th twin prime pair minus total number of prime factors of average of n-th twin prime pair.
`

`%C Prime factors are counted with multiplicity. [from Harvey P. Dale, Aug 19 2011]
`

`%F a(n)=A014574(n)-A078571(n).
`

`%t f[n_]:=Module[{mn=Mean[n]},mn-PrimeOmega[mn]]; f/@Select[Partition[ Prime[ Range[300]],2,1],Last[#]-First[#]==2&] (* _Harvey P. Dale_, Aug 19 2011 *)
`

`%K nonn
`

`%O 1,1
`

`%A _Juri-Stepan Gerasimov_, Apr 28 2010
`

`%E Formula index, a(8), a(15) and a(23) corrected by _R. J. Mathar_, May 01 2010
`