A136313 a(1) = 1; for n>1, a(n) = a(n-1) + 8 mod 22.

1, 9, 17, 3, 11, 19, 5, 13, 21, 7, 15, 1, 9, 17, 3, 11, 19, 5, 13, 21, 7, 15, 1, 9, 17, 3, 11, 19, 5, 13, 21, 7, 15, 1, 9, 17, 3, 11, 19, 5, 13, 21, 7, 15, 1, 9, 17, 3, 11, 19, 5, 13, 21, 7, 15, 1, 9, 17, 3, 11, 19, 5, 13, 21, 7, 15, 1, 9, 17, 3, 11, 19, 5, 13, 21

Offset

1,2

Comments

Cyclic with period 11. - Nathaniel Johnston, May 08 2011

References

Clifford A. Pickover, A Passion for Mathematics, Wiley, 2005; see p. 62.

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Index entries for linear recurrences with constant coefficients, signature (0,0,0,0,0,0,0,0,0,0,1).

Formula

G.f.: x*(15*x^10 +7*x^9 +21*x^8 +13*x^7 +5*x^6 +19*x^5 +11*x^4 +3*x^3 +17*x^2 +9*x +1) / (1-x^11). - Colin Barker, Sep 12 2014

Mathematica

NestList[Mod[#+8, 22]&, 1, 80] (* Harvey P. Dale, Jul 22 2013 *)
Rest[CoefficientList[Series[x*(15*x^10 + 7*x^9 + 21*x^8 + 13*x^7 + 5*x^6 + 19*x^5 + 11*x^4 + 3*x^3 + 17*x^2 + 9*x + 1)/(1 - x^11), {x, 0, 50}], x]] (* G. C. Greubel, Dec 30 2017 *)

Prog

(PARI) Vec(-x*(15*x^10 +7*x^9 +21*x^8 +13*x^7 +5*x^6 +19*x^5 +11*x^4 +3*x^3 +17*x^2 +9*x +1)/(x^11 -1) + O(x^100)) \\ Colin Barker, Sep 12 2014

Crossrefs

Cf. A190322.

Sequence in context: A329964 A050802 A264519 * A190322 A184938 A103707

Adjacent sequences: A136310 A136311 A136312 * A136314 A136315 A136316

Keyword

nonn,easy

Author

N. J. A. Sloane, Apr 20 2008

Status

approved