A216097 - OEIS

%I #21 Sep 08 2022 08:46:03

%S 1,3,9,27,81,243,729,2187,6561,9683,9049,7147,1441,4323,2969,8907,

%T 6721,163,489,1467,4401,3203,9609,8827,6481,9443,8329,4987,4961,4883,

%U 4649,3947,1841,5523,6569,9707,9121,7363,2089,6267,8801,6403,9209,7627,2881,8643,5929,7787,3361,83,249,747

%N 3^n mod 10000.

%C Period = 500.

%H V. Raman and Vincenzo Librandi, <a href="/A216097/b216097.txt">Table of n, a(n) for n = 0..1000</a> (first 500 terms from V. Raman)

%t PowerMod[3,Range[0,60],10000] (* _Harvey P. Dale_, Oct 18 2015 *)

%o (PARI) for(i=0, 100, print(3^i%10000" "))

%o (Magma) [Modexp(3, n, 10000): n in [0..110]]; // _Vincenzo Librandi_, Aug 16 2016

%Y Cf. A001148, A001218, A216096.

%K nonn,easy

%O 0,2

%A _V. Raman_, Sep 01 2012

%E Definition corrected by _Zak Seidov_, Jul 27 2014

%E a(0) = 1, offset changed by _Vincenzo Librandi_, Aug 16 2016