|
| |
|
|
A037525
|
|
Base 8 digits are, in order, the first n terms of the periodic sequence with initial period 2,1,0.
|
|
1
| |
|
|
2, 17, 136, 1090, 8721, 69768, 558146, 4465169, 35721352, 285770818, 2286166545, 18289332360, 146314658882, 1170517271057, 9364138168456, 74913105347650, 599304842781201, 4794438742249608
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Vincenzo Librandi, Table of n, a(n) for n = 1..200
Index to sequences with linear recurrences with constant coefficients, signature (8,0,1,-8).
|
|
|
FORMULA
| G.f. (2+x) / ((x-1)*(8*x-1)*(1+x+x^2)). - R. J. Mathar, Nov 21 2011
|
|
|
MATHEMATICA
| With[{c=Flatten[Table[{2, 1, 0}, {7}]]}, Table[FromDigits[Take[c, n], 8], {n, 20}]] (* From Harvey P. Dale, Aug 03 2011 *)
LinearRecurrence[{8, 0, 1, -8}, {2, 17, 136, 1090}, 200] (* Vincenzo Librandi, Nov 23 2011 *)
|
|
|
PROG
| (MAGMA) I:=[2, 17, 136, 1090]; [n le 4 select I[n] else 8*Self(n-1)+Self(n-3)-8*Self(n-4): n in [1..20]]; // Vincenzo Librandi, Nov 23 2011
|
|
|
CROSSREFS
| Sequence in context: A007354 A180840 A077243 * A037734 A201782 A132433
Adjacent sequences: A037522 A037523 A037524 * A037526 A037527 A037528
|
|
|
KEYWORD
| nonn,base,easy
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
| |
|
|