login
A352168
a(n) = Sum_{p+q = 2n, p<=q, p,q prime} (p*q mod 2n).
0
0, 0, 3, 7, 6, 11, 12, 14, 16, 22, 43, 69, 33, 22, 51, 46, 66, 80, 46, 101, 80, 81, 114, 163, 112, 105, 139, 133, 116, 162, 95, 179, 204, 78, 241, 258, 181, 207, 257, 212, 263, 484, 229, 244, 471, 156, 229, 377, 53, 350, 520, 339, 278, 472, 324, 593, 668, 370, 468, 1092, 244, 275
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
Sequence in context: A377799 A338067 A178242 * A379352 A375021 A070882
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Mar 06 2022
STATUS
approved