

A109785


Expansion of (1+x+x^2+x^7+x^82*x^10x^12) / ((x+1)*(x^2+1)*(x^2+x+1)*(x^2x+1)*(x^4x^2+1)*(x1)^2).


1



1, 2, 3, 3, 3, 3, 3, 4, 5, 5, 3, 3, 3, 4, 5, 5, 5, 5, 5, 6, 7, 7, 5, 5, 5, 6, 7, 7, 7, 7, 7, 8, 9, 9, 7, 7, 7, 8, 9, 9, 9, 9, 9, 10, 11, 11, 9, 9, 9, 10, 11, 11, 11, 11, 11, 12, 13, 13, 11, 11, 11, 12, 13, 13, 13, 13, 13, 14, 15, 15, 13, 13, 13, 14, 15, 15, 15, 15, 15, 16, 17, 17, 15, 15, 15
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,2


COMMENTS

Floretion Algebra Multiplication Program, FAMP Code: 1jbasesumseq[( .5'j + .5'k  .5j' + .5k'  'ii'  .5'ij'  .5'ik'  .5'ji'  .5'ki')*( .5'i + .5'j  .5i' + .5j'  'kk'  .5'ik'  .5'jk'  .5'ki'  .5'kj')], sumtype: (default, ver. f, ves)


LINKS

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


FORMULA

a(n) = a(n1) + a(n12)  a(n13) for n>12.  Colin Barker, May 15 2019


MATHEMATICA

CoefficientList[Series[(1+x+x^2+x^7+x^82x^10x^12)/((x+1)(x^2+1) (x^2+x+1) (x^2x+1)(x^4x^2+1)(x1)^2), {x, 0, 90}], x] (* Harvey P. Dale, Oct 21 2011 *)


PROG

(PARI) Vec((1 + x + x^2 + x^7 + x^8  2*x^10  x^12) / ((1  x)^2*(1 + x)*(1  x + x^2)*(1 + x^2)*(1 + x + x^2)*(1  x^2 + x^4)) + O(x^100)) \\ Colin Barker, May 15 2019


CROSSREFS



KEYWORD

nonn,easy


AUTHOR



STATUS

approved



