|
%I #13 Jun 06 2021 06:03:28
%S 1,13,2041,8801,1381757,24355253,249302027,464754407,2681233451,
%T 16488506281,16772956369,39665616523,72966441899,168777472279,
%U 388885239223,420953651807,2974921088191,3487599163841
%N Numbers k such that k^3 divides 14^(k^2) - 1.
%C 13 divides a(n) for n > 1.
%t Join[{1}, Select[Range[2000000], PowerMod[14, #^2, #^3] == 1 &]] (* _Robert Price_, Mar 31 2020 *)
%Y Cf. A014956 (k divides 14^k-1), A128394 (k^2 divides 14^k-1).
%Y Cf. A129211, A129212, A177905, A127106, A177907, A127102, A177909, A177243.
%Y Cf. A177911, A177912, A177913, A177914, A177915, A177916, A177917, A177918, A177919, A177920.
%K more,nonn
%O 1,2
%A _Alexander Adamchuk_, May 14 2010
%E More terms from _Max Alekseyev_, Oct 02 2010
|
