A176823 a(n) = n^(n+1) mod (n+1)^n.
0, 1, 8, 17, 399, 73, 44638, 1570497, 5077565, 486784401, 22187726197, 166394893969, 13800864889148, 762517292682713, 9603465430859099, 803800832678655745, 3180753925351614970, 947615093635545799201
Offset: 0
Keywords
Programs
-
Mathematica
Table[PowerMod[n,n+1,(n+1)^n],{n,0,20}] (* Harvey P. Dale, May 11 2017 *)
Extensions
Offset changed to 0 by Georg Fischer, Jul 23 2024