OFFSET
1,1
COMMENTS
a(n+1) - a(n) = A186809(n). - Reinhard Zumkeller, Oct 19 2015
LINKS
E. R. Berlekamp, A contribution to mathematical psychometrics, Unpublished Bell Labs Memorandum, Feb 08 1968 [Annotated scanned copy]
Index entries for linear recurrences with constant coefficients, signature (1,-1,1,-1,1).
MATHEMATICA
t = Prime@ Range@ 3; Flatten@ Table[{t, Reverse@ t}, {16}] (* Michael De Vlieger, Oct 20 2015 *)
PadRight[{}, 120, {2, 3, 5, 5, 3, 2}] (* or *) LinearRecurrence[{1, -1, 1, -1, 1}, {2, 3, 5, 5, 3}, 120] (* Harvey P. Dale, Sep 19 2016 *)
PROG
(Haskell)
a262565 n = a262565_list !! (n-1)
a262565_list = cycle [2, 3, 5, 5, 3, 2] -- Reinhard Zumkeller, Oct 19 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 19 2015
EXTENSIONS
Typo in link fixed by Zak Seidov, Oct 20 2015
STATUS
approved