I am happy to report that the problem is solved in Mathematica by Christoph Koutschan by using his add-on package "HolonomicFunctions" (https://www3.risc.jku.at/research/combinat/software/ergosum/RISC/HolonomicFunctions.html.
The problem is solved by computing recurrences for both expressions and showing that they coincide.
This relates to
https://oeis.org/A051708
Wolframalpha confirms that the recurrence obtained by Christoph Koutschan for both expressions
f[1]=2, f[2]=14, 9nf[n] + (-14 - 10n)f[1 + n] + (2 + n)*f[2 + n] == 0
gives
n | f(n)
1 | 2
2 | 14
3 | 106
4 | 838
5 | 6802
6 | 56190
7 | 470010
...
which are correct values for
https://oeis.org/A051708
So as the conclusion it follows that both:
the formula obtained byMariusz Iwaniuk
(-1)^n((-4n^2 - 16n - 28)JacobiP[-1 + n, -1 - 2n, 2, -1/2] + JacobiP[-2 + n, -2n, 3, -1/2](3 + n)(-1 + n))4^n/(48(1 + n)*n)
and the recurrence obtained by Christoph Koutschan
$$ f[1]=2, f[2]=14, 9*n*f[n] + (-14 - 10*n)*f[1 + n] + (2 + n)*f[2 + n] == 0$$
rightfully belong to
https://oeis.org/A051708
Thanks ,
Best Regards,
Alexander R Povolotsky
Attachments: