A070476 a(n) = n^3 mod 14.

0, 1, 8, 13, 8, 13, 6, 7, 8, 1, 6, 1, 6, 13, 0, 1, 8, 13, 8, 13, 6, 7, 8, 1, 6, 1, 6, 13, 0, 1, 8, 13, 8, 13, 6, 7, 8, 1, 6, 1, 6, 13, 0, 1, 8, 13, 8, 13, 6, 7, 8, 1, 6, 1, 6, 13, 0, 1, 8, 13, 8, 13, 6, 7, 8, 1, 6, 1, 6, 13, 0, 1, 8, 13, 8, 13, 6, 7, 8, 1, 6, 1, 6, 13, 0, 1, 8, 13, 8, 13, 6, 7, 8, 1

Offset

0,3

Links

G. C. Greubel, 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, 1).

Formula

From G. C. Greubel, Mar 28 2016: (Start)

a(n) = a(n-14).

G.f.: (-x -8*x^2 -13*x^3 -8*x^4 -13*x^5 -6*x^6 -7*x^7 -8*x^8 -x^9 -6*x^10 -x^11 -6*x^12 -13*x^13)/(-1 + x^14). (End)

Mathematica

PowerMod[Range[0, 100], 3, 14] (* Harvey P. Dale, Aug 23 2013 *)

Prog

(Sage) [power_mod(n, 3, 14 )for n in range(0, 94)] # Zerinvary Lajos, Oct 29 2009
(PARI) x='x+O('x^99); concat(0, Vec((-x-8*x^2-13*x^3-8*x^4-13*x^5-6*x^6 -7*x^7-8*x^8-x^9-6*x^10-x^11-6*x^12-13*x^13)/(-1+x^14))) \\ Altug Alkan, Mar 28 2016

Crossrefs

Sequence in context: A228663 A076028 A281256 * A335167 A124159 A128662

Adjacent sequences: A070473 A070474 A070475 * A070477 A070478 A070479

Keyword

nonn

Author

N. J. A. Sloane, May 12 2002

Status

approved