OFFSET
1,1
REFERENCES
Fred. Schuh, Vragen betreffende een onbepaalde vergelijking, Nieuw Tijdschrift voor Wiskunde, 52 (1964-1965) 193-198.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = n*(n+1)*(25*n^4+26*n^3-6*n^2-7*n+1)/6.
G.f.: x*(13+480*x+1582*x^2+864*x^3+61*x^4)/(1-x)^7.
MAPLE
seq(1/6*n*(n+1)*(25*n^4+26*n^3-6*n^2-7*n+1), n=1..30);
MATHEMATICA
CoefficientList[Series[(13 + 480 x + 1582 x^2 + 864 x^3 + 61 x^4)/(1 - x)^7, {x, 0, 50}], x] (* Vincenzo Librandi, Dec 30 2013 *)
PROG
(Magma) [n*(n+1)*(25*n^4+26*n^3-6*n^2-7*n+1)/6: n in [1..50]]; // Vincenzo Librandi, Dec 30 2013
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Floor van Lamoen, Oct 13 2002
EXTENSIONS
More terms from Vincenzo Librandi, Dec 30 2013
STATUS
approved