%I #21 Mar 31 2024 14:16:58
%S 1,2,3,4,6,12,15,28,366,435,532,804,1036,4636,6364,7932,11476,15051,
%T 19684,40132,75396,80956,247395,266476,280756,307396,356644,490372,
%U 531444,544348,557956,565516,572716,808228,1007574,1256356,1695484
%N Numbers k such that k | (3^k + 3).
%H Giovanni Resta, <a href="/A015888/b015888.txt">Table of n, a(n) for n = 1..400</a>
%t Join[{1,2},Select[Range[17*10^5],PowerMod[3,#,#]==#-3&]] (* _Harvey P. Dale_, Mar 31 2024 *)
%Y Cf. A006517, A015889, A015891, A015892, A015893, A015897, A015898, A015902, A015903, A015904, A015905, A015906.
%K nonn
%O 1,2
%A _Robert G. Wilson v_
%E Terms 1, 2 inserted by _Max Alekseyev_, Nov 24 2017