OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
MATHEMATICA
PowerMod[Range[0, 100], 7, 18] (* Vincenzo Librandi, Jun 17 2016 *)
PROG
(Sage) [power_mod(n, 7, 18) for n in range(90)] # Zerinvary Lajos, Oct 28 2009
(PARI) a(n)=n^7%18 \\ Charles R Greathouse IV, Apr 06 2016
(Magma) [Modexp(n, 7, 18): n in [0..80]]; // Vincenzo Librandi, Jun 17 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, May 13 2002
STATUS
approved