OFFSET
1,3
FORMULA
a(n) = Sum_{i=1..n} ( i*(2n-i) mod 2n ) * c(i) * c(2n-i), where c is the prime characteristic (A010051).
PROG
(PARI) a(n) = my(s=0); forprime(q=n, 2*n, if (isprime(p=2*n-q), s += (p*q) % (2*n))); s; \\ Michel Marcus, Mar 07 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Mar 06 2022
STATUS
approved