OFFSET
0,3
LINKS
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, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
MATHEMATICA
PowerMod[Range[0, 100], 7, 47] (* or *) PadRight[{}, 100, {0, 1, 34, 25, 28, 11, 4, 9, 12, 14, 45, 31, 42, 39, 24, 40, 32, 3, 6, 30, 26, 37, 20, 29, 18, 27, 10, 21, 17, 41, 44, 15, 7, 23, 8, 5, 16, 2, 33, 35, 38, 43, 36, 19, 22, 13, 46}] (* Harvey P. Dale, Mar 29 2019 *)
PROG
(Sage) [power_mod(n, 7, 47)for n in range(0, 74)] # - Zerinvary Lajos, Oct 29 2009
(PARI) a(n)=n^7%47 \\ Charles R Greathouse IV, Apr 06 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, May 13 2002
STATUS
approved