OFFSET
0,2
COMMENTS
This is a row of the triangle in A162499.
Only finitely many terms are nonzero.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..155 (complete sequence)
MATHEMATICA
CoefficientList[ Series[Times @@ (1 - x^(3 Range@10))/(1 - x)^10, {x, 0, 70}], x] (* Vincenzo Librandi, Mar 14 2013 and slightly modified by Robert G. Wilson v, Jul 23 2018 *)
PROG
(PARI) x='x+O('x^155); Vec((1-x^3)*(1-x^6)*(1-x^9)*(1-x^12)*(1-x^15)*(1-x^18)*(1-x^21)*(1-x^24)*(1-x^27)*(1-x^30)/(1-x)^10) /* complete row */ \\ G. C. Greubel, Jul 06 2018
(Magma) m:=155; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!((1-x^3)*(1-x^6)*(1-x^9)*(1-x^12)*(1-x^15)*(1-x^18)*(1-x^21)*(1-x^24)*(1-x^27)*(1-x^30)/(1-x)^10)); /* complete row */ // G. C. Greubel, Jul 06 2018
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
N. J. A. Sloane, Dec 02 2009
STATUS
approved