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, 1).
MATHEMATICA
PowerMod[Range[0, 90], 4, 39] (* Harvey P. Dale, Oct 20 2019 *)
(* Alternative: *)
PadRight[{}, 90, {0, 1, 16, 3, 22, 1, 9, 22, 1, 9, 16, 16, 27, 13, 1, 3, 16, 22, 27, 22, 22, 27, 22, 16, 3, 1, 13, 27, 16, 16, 9, 1, 22, 9, 1, 22, 3, 16, 1}] (* Harvey P. Dale, Oct 20 2019 *)
PROG
(PARI) a(n)=n^4%39 \\ Charles R Greathouse IV, Apr 06 2016
CROSSREFS
KEYWORD
nonn,easy,changed
AUTHOR
N. J. A. Sloane, May 13 2002
STATUS
approved
