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