OFFSET
3,1
REFERENCES
J. Riordan, Discordant permutations, Scripta Math., 20 (1954), 14-23.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
G. C. Greubel, Table of n, a(n) for n = 3..1000
Simon Plouffe, Approximations de séries génératrices et quelques conjectures, Dissertation, Université du Québec à Montréal, 1992; arXiv:0911.4975 [math.NT], 2009.
Simon Plouffe, 1031 Generating Functions, Appendix to Thesis, Montreal, 1992
J. Riordan, Discordant permutations, Scripta Math., 20 (1954), 14-23. [Annotated scanned copy]
Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1).
FORMULA
G.f.: x^3*(6 + 20*x + 5*x^2 - 4*x^3) / (1 - x)^4. - Jeffrey Shallit [adapted by Vincenzo Librandi, Feb 10 2016]
a(n) = n*(9*n^2 - 45*n + 58)/2. - Barbara Haas Margolius (margolius(AT)math.csuohio.edu), Feb 17 2001
E.g.f.: x*(-22 - 4*x + (22 - 18*x + 9*x^2)*exp(x))/2. - G. C. Greubel, Nov 23 2018
MAPLE
f := n->9/2*n^3-45/2*n^2+29*n; seq(f(n), n=0..50); # Barbara Haas Margolius (margolius(AT)math.csuohio.edu), Feb 17 2001
A000561:=-(-6-20*z-5*z**2+4*z**3)/(z-1)**4; # conjectured by Simon Plouffe in his 1992 dissertation
MATHEMATICA
LinearRecurrence[{4, -6, 4, -1}, {6, 44, 145, 336}, 50] (* Jean-François Alcover, Feb 10 2016 *)
Drop[CoefficientList[Series[x^3(6+20x+5x^2-4x^3)/(1-x)^4, {x, 0, 50}], x], 3] (* Harvey P. Dale, Jul 20 2021 *)
PROG
(Magma) [(9/2)*n^3-(45/2)*n^2+29*n: n in [3..45]]; // Vincenzo Librandi, Feb 10 2016
(PARI) for(n=3, 45, print1(n*(9*n^2 - 45*n + 58)/2, ", ")) \\ G. C. Greubel, Nov 23 2018
(Sage) [n*(9*n^2 - 45*n + 58)/2 for n in (3..45)] # G. C. Greubel, Nov 23 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
More terms from Barbara Haas Margolius (margolius(AT)math.csuohio.edu), Feb 17 2001
STATUS
approved