[go: up one dir, main page]

login
A322597
a(n) = (4*n^3 - 6*n^2 + 20*n + 3)/3.
0
1, 7, 17, 39, 81, 151, 257, 407, 609, 871, 1201, 1607, 2097, 2679, 3361, 4151, 5057, 6087, 7249, 8551, 10001, 11607, 13377, 15319, 17441, 19751, 22257, 24967, 27889, 31031, 34401, 38007, 41857, 45959, 50321, 54951, 59857, 65047, 70529, 76311, 82401, 88807
OFFSET
0,2
COMMENTS
For n >= 2, a(n) gives the number of function evaluations for Dooren and Ridder's degree 5 and 7 cubature rule over an n-dimensional cube, with the exception of a(3) = 45 and a(4) = 97.
LINKS
Paul van Dooren and Luc de Ridder, An adaptive algorithm for numerical integration over an n-dimensional cube, Journal of Computational and Applied Mathematics, Vol. 2 (1976), 207-217.
Alan C. Genz and Awais A. Malik, Remarks on algorithm 006: An adaptive algorithm for numerical integration over an N-dimensional rectangular region, Journal of Computational and Applied Mathematics, Vol. 6 (1980), 295-302.
FORMULA
a(n) = 4*a(n-1) - 6*a(n-2) + 4*a(n-3) - a(n-4), n >= 4.
G.f.: (1 + 3*x - 5*x^2 + 9*x^3)/((1 - x)^4).
E.g.f.: (1/3)*(3 + 18*x + 6*x^2 + 4*x^3)*exp(x).
MAPLE
[(4*n^3-6*n^2+20*n+3)/3$n=0..50]; # Muniru A Asiru, Jan 23 2019
MATHEMATICA
Table[(4*n^3 - 6*n^2 + 20*n + 3)/3, {n, 0, 50}]
PROG
(Maxima) makelist((4*n^3 - 6*n^2 + 20*n + 3)/3, n, 0, 50);
CROSSREFS
First differences: 2*A093328.
Sequence in context: A213789 A058273 A058274 * A360428 A193214 A184862
KEYWORD
nonn,easy
AUTHOR
STATUS
approved