%I #25 Dec 18 2022 15:24:44
%S 1,512,38854,1455278,37712866,779305142,13821281314,219680806598,
%T 3216941445106,44222780245622,578333776748674,7265797378375718,
%U 88340967898764946,1045408905465897302,12094777018030598434,137292855542017989638
%N Poly-Bernoulli numbers B_n^(k) with k = -9.
%C a(n) is also the number of acyclic orientations of the complete bipartite graph K_{9,n}. - _Vincent Pilaud_, Sep 16 2020
%H Seiichi Manyama, <a href="/A284033/b284033.txt">Table of n, a(n) for n = 0..994</a>
%H <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (54,-1266,16884,-140889,761166,-2655764,5753736,-6999840,3628800).
%F a(n) = 362880*10^n - 1451520*9^n + 2328480*8^n - 1905120*7^n + 834120*6^n - 186480*5^n + 18150*4^n - 510*3^n + 2^n.
%t Table[362880*10^n - 1451520*9^n + 2328480*8^n - 1905120*7^n + 834120*6^n - 186480*5^n + 18150*4^n - 510*3^n + 2^n, {n, 0, 20}] (* _Indranil Ghosh_, Mar 19 2017 *)
%t LinearRecurrence[{54,-1266,16884,-140889,761166,-2655764,5753736,-6999840,3628800},{1,512,38854,1455278,37712866,779305142,13821281314,219680806598,3216941445106},20] (* _Harvey P. Dale_, Dec 18 2022 *)
%o (PARI) a(n) = 362880*10^n - 1451520*9^n + 2328480*8^n - 1905120*7^n + 834120*6^n - 186480*5^n + 18150*4^n - 510*3^n + 2^n; \\ _Indranil Ghosh_, Mar 19 2017
%o (Python) def a(n): return 362880*10**n - 1451520*9**n + 2328480*8**n - 1905120*7**n + 834120*6**n - 186480*5**n + 18150*4**n - 510*3**n + 2**n # _Indranil Ghosh_, Mar 19 2017
%Y Row 9 of array A099594.
%K nonn
%O 0,2
%A _Seiichi Manyama_, Mar 18 2017
|