A260297 a(n) = prime(n) - (hyperfactorial(prime(n)-1) mod prime(n)).
1, 2, 2, 6, 1, 5, 4, 1, 1, 12, 1, 31, 32, 1, 46, 23, 58, 11, 1, 1, 46, 78, 82, 55, 75, 91, 102, 106, 33, 98, 126, 1, 100, 138, 44, 1, 129, 1, 1, 80, 1, 162, 190, 112, 183, 198, 210, 1, 1, 122, 89, 1, 177, 250, 241, 262, 187, 1, 217, 228, 282, 138, 306, 1, 25
Offset: 1
Examples
a(1) = prime(1) - (hyperfactorial(prime(1)-1)) mod prime(1) = 2 - hyperfactorial(2-1) mod (2) = 2 - 1 mod 2 = 2 - 1 = 1.
Links
- Matthew Campbell, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Table[Prime[n] - Mod[Hyperfactorial[Prime[n] - 1], Prime[n]], {n, 1, 70}]
-
PARI
a(n,p=prime(n))=lift(-prod(k=1,p-1,Mod(k,p)^k)) \\ Charles R Greathouse IV, Jul 23 2015
Formula
a(n) = prime(n) - A260178(n).