A250107 Column 3 of triangle in A250104 (or A124323).
1, 0, 10, 20, 140, 616, 3444, 19440, 117975, 753500, 5068492, 35764092, 264044235, 2034636800, 16327586760, 136180742640, 1178372198220, 10561041814380, 97889061389210, 937053052507880, 9252175434771885, 94115781485796488, 985250825472122200
Offset: 3
Keywords
Links
- T. Mansour, A. O. Munagi, Set partitions with circular successions, European Journal of Combinatorics, 42 (2014), 207-216.
Programs
-
Maple
A250107 := proc(n) A124323(n,3) ; end proc: seq(A250107(n),n=3..50) ; # R. J. Mathar, Jan 22 2015
-
Mathematica
t[0, 0] = 0; t[1, 0] = 1; t[1, 1] = 0; t[n_, k_] := Binomial[n, k] ((-1)^(n-k) + Sum[(-1)^(j-1) BellB[n-k-j], {j, 1, n-k}]); Table[t[n, 3], {n, 3, 25}] (* Jean-François Alcover, Mar 30 2020 *)