|
%I #10 Oct 18 2020 22:32:08
%S 3,4,3,6,3,4,3,4,5,12,3,5,4,5,5,9,4,7,5,4,11,12,3,6,5,10,4,17,5,16,9,
%T 11,9,13,4,10,7,5,5,9,4,7,11,9,12,24,5,8,6,9,5,54,10,11,7,7,17,60,5,
%U 13,16,4,9,5,11,37,9,12,13,36,7,37,10,6,7,16,5,27
%N a(n) is the least k > 1 such that the base n representation of k^k ends with that of k.
%H Rémy Sigrist, <a href="/A338128/b338128.txt">Table of n, a(n) for n = 2..10000</a>
%H <a href="/index/Ar#automorphic">Index entries for sequences related to automorphic numbers</a>
%F a(n) <= n+1 with equality iff n belongs to A065296.
%e a(10) = A082576(2) = 5.
%o (PARI) a(n) = for (k=2, oo, if (Mod(k, n^#digits(k,n))^k==k, return (k)))
%Y Cf. A065296, A082576.
%K nonn,base
%O 2,1
%A _Rémy Sigrist_, Oct 11 2020
|
