A216097 3^n mod 10000.

1, 3, 9, 27, 81, 243, 729, 2187, 6561, 9683, 9049, 7147, 1441, 4323, 2969, 8907, 6721, 163, 489, 1467, 4401, 3203, 9609, 8827, 6481, 9443, 8329, 4987, 4961, 4883, 4649, 3947, 1841, 5523, 6569, 9707, 9121, 7363, 2089, 6267, 8801, 6403, 9209, 7627, 2881, 8643, 5929, 7787, 3361, 83, 249, 747

Offset

0,2

Comments

Period = 500.

Links

V. Raman and Vincenzo Librandi, Table of n, a(n) for n = 0..1000 (first 500 terms from V. Raman)

Mathematica

PowerMod[3, Range[0, 60], 10000] (* Harvey P. Dale, Oct 18 2015 *)

Prog

(PARI) for(i=0, 100, print(3^i%10000" "))
(Magma) [Modexp(3, n, 10000): n in [0..110]]; // Vincenzo Librandi, Aug 16 2016

Crossrefs

Cf. A001148, A001218, A216096.

Sequence in context: A216096 A300148 A190128 * A243845 A354269 A140429

Adjacent sequences: A216094 A216095 A216096 * A216098 A216099 A216100

Keyword

nonn,easy

Author

V. Raman, Sep 01 2012

Extensions

Definition corrected by Zak Seidov, Jul 27 2014

a(0) = 1, offset changed by Vincenzo Librandi, Aug 16 2016

Status

approved