f[n_]:=Module[{mn=Mean[n]}, mn-PrimeOmega[mn]]; f/@Select[Partition[ Prime[ Range[300]], 2, 1], Last[#]-First[#]==2&] (* From _Harvey P. Dale, _, Aug 19 2011 *)
f[n_]:=Module[{mn=Mean[n]}, mn-PrimeOmega[mn]]; f/@Select[Partition[ Prime[ Range[300]], 2, 1], Last[#]-First[#]==2&] (* From _Harvey P. Dale, _, Aug 19 2011 *)
_Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), _, Apr 28 2010
Formula index, a(8), a(15) and a(23) corrected by _R. J. Mathar (mathar(AT)strw.leidenuniv.nl), _, May 01 2010
editing
approved
Prime factors are counted with multiplicity. [from Harvey P. Dale, Aug 19 2011]
f[n_]:=Module[{mn=Mean[n]}, mn-PrimeOmega[mn]]; f/@Select[Partition[ Prime[ Range[300]], 2, 1], Last[#]-First[#]==2&] (* From Harvey P. Dale, Aug 19 2011 *)
approved
editing
proposed
approved
Average of n-th twin prime pair minus total number of prime factors of average of n-th twin prime pair.
2, 4, 9, 15, 27, 39, 56, 67, 99, 103, 135, 146, 175, 185, 194, 224, 234, 265, 279, 307, 344, 415, 425, 458, 518, 566, 594, 615, 639, 655, 804, 819, 823, 854, 877, 1015, 1027, 1045, 1058, 1087, 1143, 1226, 1274, 1286, 1298, 1314, 1423, 1447, 1478, 1482, 1603
1,1
nonn,new
Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Apr 28 2010
Formula index, a(8), a(15) and a(23) corrected by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), May 01 2010
approved