A134295 -id:A134295 - cp's OEIS frontend

A134296 Quotients A134295(p)/p = (1/p) * Sum_{k=1..p} ((p-k)!*(k-1)! - (-1)^k), where p = prime(n).

1, 2, 13, 259, 750371, 81566917, 2642791002353, 716984262871579, 102688143363690674087, 21841112114495269555043222069, 17727866746681961093761724283871

Offset: 1

Graph
List
Refs
Listen
History
Text
Internal format

Alexander Adamchuk, Oct 17 2007

nonn

A134295(n) = Sum_{k=1..n} ((n-k)!*(k-1)! - (-1)^k) = {2, 2, 6, 16, 65, 312, 1813, 12288, 95617, 840960, 8254081, ...}. According to the Generalized Wilson-Lagrange Theorem, a prime p divides (p-k)!*(k-1)! - (-1)^k for all integers k > 0. a(n) = A134295(p)/p for p = prime(n). a(n) is prime for n = {2, 3, 7, 9, 37, ...}. Corresponding prime terms in a(n) are {2, 13, 2642791002353, 102688143363690674087, ...}.

Cf. A007540, A007619 (Wilson quotients: ((p-1)!+1)/p).

Cf. A134295 (Sum_{k=1..n} ((n-k)!*(k-1)! - (-1)^k)).

Table[ (Sum[ (Prime[n]-k)!*(k-1)! - (-1)^k, {k,1,Prime[n]} ]) / Prime[n], {n,1,20} ]

a(n) = (1/p) * Sum_{k=1..p} ((p-k)!*(k-1)! - (-1)^k) where p = prime(n).

cp's OEIS Frontend

A134296 Quotients A134295(p)/p = (1/p) * Sum_{k=1..p} ((p-k)!*(k-1)! - (-1)^k), where p = prime(n).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

Formula