STATUS
editing
approved
editing
approved
Table[Prime[Range[n]].Prime[Range[n+1, 2n]], {n, 50}] (* Harvey P. Dale, Mar 30 2024 *)
approved
editing
editing
approved
a(n) = Sum_{1<=k<=1..n} prime(k)*prime(n+k).
proposed
editing
editing
proposed
(PARI) a(n) = sum(k=1, n, prime(k)*prime(n+k)); \\ Michel Marcus, Sep 02 2020
Cf. A033994 (similar when prime(n) is replaced with n).
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed