Wilson Quotient

Author

Eric W. Weisstein
September 26, 2007

This notebook downloaded from http://mathworld.wolfram.com/notebooks/PrimeNumbers/WilsonQuotient.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/WilsonQuotient.html.

©2007 Wolfram Research, Inc. except for portions noted otherwise

Code

WilsonQuotient[p_]:=(((p-1)!+1)/p)

Enumeration

WilsonQuotient[1]

WilsonQuotient/@Prime[Range[10]]

WilsonQuotient/@Range[20]

Flatten[Position[%,_Integer,{1}]]