%I #14 Jun 06 2021 09:03:55
%S 1,2,3,4,6,8,10,12,20,24,30,40,50,57,60,68,78,100,110,111,114,120,136,
%T 150,156,200,204,220,222,228,258,300,312,330,340,390,408,440,444,456,
%U 516,550,570,600,660,680,780,820,876,888,930,1010,1020,1032,1086,1100
%N Numbers k such that k^3 divides 7^(k^2) - 1.
%H Robert Price, <a href="/A177907/b177907.txt">Table of n, a(n) for n = 1..2835</a>
%t Select[Range[1100],Divisible[7^(#^2)-1,#^3]&] (* _Harvey P. Dale_, Nov 05 2011 *)
%Y Cf. A067947 (k divides 7^k-1), A127107 (k^2 divides 7^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 nonn
%O 1,2
%A _Alexander Adamchuk_, May 14 2010