A273772 Least k > 1 such that n*(k*n-1) - 1 divides n^(k*n-1) - 1, or 0 if no such k exists.
381713, 58651, 12301, 2861, 1656278791, 547, 5179643, 214, 2719331, 26627, 73651287679, 90205, 5069, 5533707, 13117, 58385, 791716066017, 5589, 21214381292, 3802401, 509437122973, 167, 1261552, 6001, 1144853, 3111, 6952504, 143573
Offset: 2
Programs
-
PARI
a(n)=my(k=2,n2=n^2); while(Mod(n,k*n2-n-1)^(k*n-1)!=1, k++); k \\ Charles R Greathouse IV, Jun 02 2016
Extensions
a(3) corrected by Charles R Greathouse IV, Jun 02 2016
a(6)-a(17) from Charles R Greathouse IV, Jun 04 2016
a(18)-a(29) from Lucas A. Brown, Feb 28 2024
Comments