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
Programs
-
PARI
{a(n) = if(n==2, 0, my(cnt=0, k=0); while(cnt
Formula
a(n) = A333500(n,n).