A333502 a(n) is the n-th number m such that m^2 divides n^m - 1 (or 0 if m does not exist).

1, 0, 4, 903, 12, 776119592182705, 12, 42931441, 136, 27486820443, 60, 107342336783, 84

Offset

1,3

Links

Table of n, a(n) for n=1..13.

Formula

a(n) = A333500(n,n).

Prog

(PARI) {a(n) = if(n==2, 0, my(cnt=0, k=0); while(cnt<n, k++; if(Mod(n, k^2)^k==1, cnt++)); k)}

Crossrefs

Main diagonal of A333500.

Cf. A127106, A127100, A128405, A333433.

Sequence in context: A159706 A349077 A188978 * A202684 A332194 A364276

Adjacent sequences: A333499 A333500 A333501 * A333503 A333504 A333505

Keyword

nonn,more

Author

Seiichi Manyama, Mar 24 2020

Status

approved