A056087 - OEIS

%I #14 Jul 06 2021 02:15:11

%S 1,1376,1999,3374,3376,4751,5374,6749,6751,8126,8749,10124,10126,

%T 11501,12124,13499,13501,14876,15499,16874,16876,18251,18874,20249,

%U 20251,21626,22249,23624,23626,25001,25624,26999,27001,28376,28999,30374,30376,31751,32374

%N Numbers k such that k^14 == 1 (mod 15^3).

%H Amiram Eldar, <a href="/A056087/b056087.txt">Table of n, a(n) for n = 1..10000</a>

%t x=15; Select[ Range[ 50000 ], PowerMod[ #, x-1, x^3 ]==1& ]

%t Select[Range[31000],PowerMod[#,14,3375]==1&] (* _Harvey P. Dale_, Nov 27 2019 *)

%Y Cf. A056082, A056083, A056084, A056085, A056086, A056088, A056089.

%K nonn

%O 1,2

%A _Robert G. Wilson v_, Jun 08 2000