%I#15 2019年5月15日04:56:21

%第1,6,12,18,57,51,40156209145,7533053153433012660010741278页，

%电话：1122651196987189524882559208111622881512305142754824，

%电话：45633537192640521964599675081008370750656343015

%N五角三角形。

%C这是A093445，因为五边形编号A000326是三角形编号A000217。三角表的第n行首先按顺序考虑A000217（n）五边形数（从1开始）。现在将它们分成n个块，从第一个块中的n个成员开始，第二个块中有n-1个成员，依此类推。现在将每个块相加。因此，第一项是前n个数之和=n*（3n-1）/2，第二项是后n-1项之和（从n+1到2n-1），第三项是后n-2项（2n到3n-3）之和。。。这个三角形可以称为五边形三角形。序列包含按行排列的三角形。第一列是A002411（五角锥数：n^2*（n+1）/2）。

%F T（n，1）=A002411（n）。

%F T（n，2）=n*（n-1）*（7*n-2）/2。

%F T（n，3）=（n-2）*（19*n^2-26*n+9）/2=Sum_｛i=2n..3（n-1）｝A000326（i）。

%e n=4的行是（1+5+12+22），（35+51+70），（92+117），145=>40，156，209，145。

%e 1；

%e 6、12；

%e 18、57、51；

%e第40、156、209、145页；

%e第75、330、531、534、330页；

%e 126、600、1074、1278、1122、651；

%e 196、987、1895、2488、2559、2081、1162；

%e 288、1512、3051、4275、4824、4563、3537、1926；

%电子邮箱：405、2196、4599、6750、8100、8370、7506、5634、3015；

%电子邮箱550、3060、6596、10024、12570、13775、13450、11631、8534、4510；

%p A000326：=程序（n）n*（3*n-1）/2；结束进程：

%p A177708：=过程（n，k）kc:=1；nsk：=n；ns：=1；而kc<k do ns：=ns+nsk；kc:=kc+1；nsk：=nsk-1；结束do：添加（A000326（i），i=ns。。ns+nsk-1）；结束程序：#R.J.Mathar，2010年12月14日

%t表[Total/@TakeList[PolygonalNumber[5，Range[60]]，Range[n，1，-1]]，{n，10}]//展平（*需要Mathematica版本11或更高版本*）（*Harvey P.Dale_，2018年2月17日*）

%Y参见A000217、A000326、A002411、A093445、A236770（右边框）。

%K nonn，简单，表格

%O 1,2号机组

%A _Jonathan Vos Post，2010年12月11日