|
%I #15 Oct 23 2018 05:45:42
%S 1,2,13,14,26,182,286,2626,2926,8866,10186,57226,62686,118378,185653,
%T 187838,284662,396526,689546,792946,927706,1110214,1140686,1501526,
%U 1943266,2034406,2402686,2427706,2759926,3032926,4450706,6586426,6849766,7319026,9357518
%N Numbers k such that k | 13^k + 13.
%H Giovanni Resta, <a href="/A015905/b015905.txt">Table of n, a(n) for n = 1..400</a>
%t Select[Range[10^6], Mod[13 + PowerMod[13, #, #], #] == 0 &] (* _Giovanni Resta_, Oct 21 2018 *)
%Y Cf. A006517, A015888, A015889, A015891, A015892, A015893, A015897, A015898, A015902, A015903, A015904, A015906.
%K nonn
%O 1,2
%A _Robert G. Wilson v_
%E Missing a(2) and a(33)-a(35) from _Giovanni Resta_, Oct 21 2018
|
