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, 1).
MATHEMATICA
Mod[Range[0, 90]^4, 28] (* Harvey P. Dale, Feb 04 2011 *)
PowerMod[Range[0, 90], 4, 28] (* or *) PadRight[{}, 90, {0, 1, 16, 25, 4, 9, 8, 21, 8, 9, 4, 25, 16, 1}] (* Harvey P. Dale, Aug 25 2025 *)
PROG
(SageMath) [power_mod(n, 4, 28)for n in range(0, 88)] # - Zerinvary Lajos, Oct 31 2009
(PARI) a(n)=n^4%28 \\ Charles R Greathouse IV, Apr 06 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, May 13 2002
STATUS
approved
