%I #13 Jul 06 2021 02:15:00
%S 1,1047,1048,1353,1354,2400,2402,3448,3449,3754,3755,4801,4803,5849,
%T 5850,6155,6156,7202,7204,8250,8251,8556,8557,9603,9605,10651,10652,
%U 10957,10958,12004,12006,13052,13053,13358,13359,14405,14407,15453,15454,15759,15760
%N Numbers k such that k^6 == 1 (mod 7^4).
%H Amiram Eldar, <a href="/A056092/b056092.txt">Table of n, a(n) for n = 1..10000</a>
%t x=7; Select[ Range[ 20000 ], PowerMod[ #, x-1, x^4 ]==1& ]
%Y Cf. A056091, A056094, A056095.
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Jun 08 2000
|