|
| |
|
|
A359108
|
|
a(n) = A128899(2*n, n) = 2*binomial(4*n - 1, 3*n) for n >= 1 and a(0) = 1.
|
|
0
|
|
|
|
1, 2, 14, 110, 910, 7752, 67298, 592020, 5259150, 47071640, 423830264, 3834669566, 34834267234, 317506779800, 2902365981900, 26597044596360, 244263468539790, 2247575790712824, 20716044882791720, 191230475831922200, 1767658071106087160, 16359617358545329440
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Table of n, a(n) for n=0..21.
|
|
|
FORMULA
|
a(n) = (8*(2*n - 1) * (4*n - 3) * (4*n - 1) * a(n - 1)) / (3*n * (3*n - 2) * (3*n - 1))) for n >= 2.
a(n) = (1/2)*A005810(n) = 2*A224274(n) for n >= 1. - Peter Bala, Feb 08 2023
|
|
|
MAPLE
|
a := n -> ifelse(n = 0, 1, 2*binomial(4*n - 1, 3*n)):
# Alternative:
a := proc(n) option remember; ifelse(n < 2, n + 1, (8*(2*n - 1) * (4*n - 3) * (4*n - 1) * a(n - 1)) / (3 * n * (3*n - 2) * (3*n - 1))) end:
seq(a(n), n = 0..19);
|
|
|
CROSSREFS
|
Cf. A005810, A128899, A224274.
Sequence in context: A103945 A111713 A144278 * A214766 A330553 A275649
Adjacent sequences: A359105 A359106 A359107 * A359109 A359110 A359111
|
|
|
KEYWORD
|
nonn,easy
|
|
|
AUTHOR
|
Peter Luschny, Dec 27 2022
|
|
|
STATUS
|
approved
|
| |
|
|
