A109541 a(n) = a(n-2)+a(n-3)+a(n-4)+a(n-5)+2*a(n-6)+a(n-7).

1, 1, 1, 1, 1, 1, 1, 7, 7, 13, 19, 31, 49, 85, 133, 217, 349, 565, 913, 1483, 2395, 3877, 6271, 10147, 16417, 26569, 42985, 69553, 112537, 182089, 294625, 476719, 771343, 1248061, 2019403, 3267463, 5286865, 8554333, 13841197, 22395529, 36236725

Offset

0,8

Links

Table of n, a(n) for n=0..40.

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

Mathematica

F[1] = 1; F[2] = 1; F[3] = 1; F[4] = 1; F[5] = 1; F[6] = 1; F[7] = 1; F[n__] := F[n] = F[n - 2] + F[n - 3] + F[n - 4] + F[n - 5] + 2*F[n - 6] + F[n - 7] aa = Table[F[n], {n, 1, 50}]
LinearRecurrence[{0, 1, 1, 1, 1, 2, 1}, {1, 1, 1, 1, 1, 1, 1}, 50] (* Harvey P. Dale, Dec 22 2014 *)

Crossrefs

Sequence in context: A332304 A317790 A109539 * A173314 A040043 A339706

Adjacent sequences: A109538 A109539 A109540 * A109542 A109543 A109544

Keyword

nonn

Author

Roger L. Bagula, Jun 20 2005

Status

approved