%I #12 Oct 23 2018 05:43:10
%S 1,2,3,6,14,42,66,111,606,742,3486,6666,8646,13118,26751,58618,66886,
%T 125686,141526,144886,489958,525994,695254,752691,1198554,1234806,
%U 2200386,2479686,2671306,2862006,3277626,3716602,5923126,6490947
%N Numbers k such that k | 6^k + 6.
%H Giovanni Resta, <a href="/A015892/b015892.txt">Table of n, a(n) for n = 1..200</a>
%t Select[Range[10^5], Mod[PowerMod[6, #, #] + 6, #] == 0 &] (* _Giovanni Resta_, Oct 23 2018 *)
%Y Cf. A006517, A015888, A015889, A015891, A015893, A015897, A015898, A015902, A015903, A015904, A015905, A015906.
%K nonn
%O 1,2
%A _Robert G. Wilson v_
%E Missing a(2)-a(3) from _Giovanni Resta_, Oct 23 2018
|