%I#25 2017年8月19日23:21:36

%S 1,4,16,60218778274496003339111563839913713740504720272，

%电话：16187632554344241896074064787219922117948047545239986，

%电话：257226764028764135715029858703810159143998133456670422011757143968339976448714086135887220346719

%N半周长N的条形图的面积之和（N>=2）。

%D A.Blecher、C.Brennan和A.Knopfmacher，条形图中的组合参数（预印本）。

%H Alois P.Heinz，<a href=“/A273347/b273347.txt”>n，a（n）表，n=2.1000</a>

%H M.Bousquet-Mélou和A.Rechnitzer，<A href=“http://dx.doi.org/10.1016/S0196-8858（02）00553-5“>条形图的现场周线</a>，《应用数学进展》31（2003），86-112。

%H M.Bousquet-Mélou和R.Brak，<a href=“https://hal.archives-ouvertes.fr/hal-00342024“>多面体和多边形的精确求解模型</a>，《多边形、多面体与多面体》第3章，《物理讲义》，第775卷，第43-78页，斯普林格，柏林，海德堡，2009年。

%H Emeric Deutsch，S Elizalde，<a href=“http://arxiv.org/abs/1609.00088“>被视为无角Motzkin路径的条形图统计</a>，arXiv预印arXiv:1609.00088，2016

%F G.F.：G（z）=z^2（2-z-z^3-zq）^2/（1-4z+z^4+q+z^2q）^2，其中q=sqrt（1-4z+2z^2+z^4）（见Blecher等人参考文献第4.3节）。

%F a（n）=和（k*A273346（n，k），k>=1）。

%F a（n）=（（69-115*n+28*n^2）*a（n-1）-）/（n*（4*n-13）），对于n>=7.-_Alois P.Heinz，2016年6月4日

%e a（4）=16，因为半周长4的5（=A082582（4））条图对应于组成[1,1,1]、[1,2]、[2,1]、[2,2]和[3]，并且它们的面积之和显然是3+3+3+4+3=16。

%pQ:=sqrt（1-4*z+2*z^2+z^4）：g:=z^2*（2-zz^3-z*Q）^2/（1-4*z+z^4+Q+z^2x（2+Q））^2；gser：=系列（g，z=0,40）：seq（系数（gser，z，m），m=2。。35);

%p#第二个Maple程序：

%p a:=proc（n）选项记忆；

%p“如果”（n<7，[0$2，1，4，16，60，218，778][n+1]，

%p（（69-115*n+28*n^2）*a（n-1）-（264-265*n+52*n^1）*a

%p+（3*（29-29*n+4*n^2））*a（n-3）-（3*

%p+（4*n-9）*（5*n-29）*a（n-5）+（4xn-13）*（n-6）*a

%p+（n-7）*（4*n-9）*a（n-7

%p端：

%p序列（a（n），n=2..30）；#_Alois P.Heinz，2016年6月4日

%tb[n_，y_，t_]：=b[n，y，t]=展开[If[n==0，1-t，If[t<0，0，b[n-1，y+1，1]]+If[t>0 | | y<2，0，b[n，y-1，-1]]+If[y<1，0，b2，y，0]]；T[n_]：=函数[p，表[系数[p，z，i]，{i，1，指数[p，z]}]][b[n，0，0]]；a[n]：=（row=T[n]；row.Range[Length[row]]）；表[a[n]，{n，2，30}]（*_Jean-François Alcover_，2016年11月29日，在_Alois P.Heinz的A273346*枫叶代码之后）

%Y参见A273346和A273348。

%K nonn公司

%氧2,2

%2016年6月3日德国