OFFSET
0,1
COMMENTS
Add both primes of the pair as well as their prime indices.
EXAMPLE
Prime(3) - prime(2) = 5 - 3 = 2; prime(3) + prime(2) + 3 + 2 = 13 = a(1).
MATHEMATICA
f[{a_, b_}]:=a+b+Total[PrimePi[{a, b}]]; f/@Select[ Partition[ Prime[ Range[300]], 2, 1], Last[#]-First[#]==2&] (* Harvey P. Dale, Apr 07 2011 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Sep 22 2003
EXTENSIONS
Edited by Ray Chandler, Sep 29 2003
STATUS
approved