登录
由第T(n,k)行读取的不规则三角形,其中第n行列出了n个块,其中第m个块由第j行三角形组成A127093号但每一项都乘以A000041号(m-1),其中j=n-m+1和1<=m<=n。
7

%I#51 2023年9月28日05:08:08

%S 1,1,1,1,0,3,1,2,1,2,1,2,2,0,4,1,3,2,4,3,3,1,0,0,5,1,0,4,2,0,6,6,6,

%温度:5,1,2,3,0,0,6,1,0,0,0,0,1,5,2,4,0,8,3,0,10,7,1,0,12,3,0,

%U 6,2,0,0,10,3,6,0,12,5,0,15,7,14,11,2,0,4,0,0,8

%N由第T(N,k)行读取的不规则三角形,其中第N行列出了N个块,其中第m个块由三角形A127093的第j行组成,但每个项都乘以A000041(m-1),其中j=N-m+1和1<=m<=N。

%C这个三角形是更不规则三角形A340031的浓缩版本。

%C有关对应除数/部分的更多信息,请参见A338156。

%H Paolo Xausa,n的表格,a(n)表示n=1.11480(三角形的第1..40行,展平)

%e三角形开始:

%e[1];

%e[1,2],[1];

%e[1,0,3],[1,2],[2];

%e[1、2、0、4]、[1、0、3]、[2、4]和[3];

%e[1,0,0,0,5],[1,2,0,4],[2,0,6],[3],[5];

%e[。。。

%e行总和为A066186。

%e写成不规则四面体,前五个切片是:

%e(电子)--

%e 1;

%e(电子)-----

%e 1、2、,

%e 1;

%e(电子)--------

%e 1、0、3、,

%e 1、2、,

%e 2;

%e(电子)-----------

%e 1、2、0、4、,

%e 1、0、3、,

%e 2、4、,

%e 3;

%e(电子)--------------

%e 1,0,0,0,5,

%e 1、2、0、4,

%e 2、0、6、,

%e3、6,

%e 5;

%e(电子)--------------

%e行总和表示A339106。

%e由四个区域组成的下表显示了除数和部分之间的对应关系(n=1..5):

%e、。

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%电子|n||1|2|3|4|5|

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%e|P||||| | | ||

%电子|A||||||

%e | R | | | ||

%e | T | | | | |||5|

%e | I | | | | ||3 2|

%e|T||||4|4 1|

%e|I||||| 2 2 |2 2 1|

%e | O | | | | 3 | 3 1 | 3 1 1|

%e|N|||2|2 1|2 1 1|2 11 1 1|

%e|S||1|1 1|1 1 1|1 11 |1 1 1 1|1|1 1 11|

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%e。

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%e | | A181187 | 1 | 3 1 | 6 2 1 | 12 5 2 1 | 20 8 4 2 1|

%e|L||||| | |/| |//|/|//|

%e|I|A066633|1|2 1|4 1 1|7 3 1 1|12 4 2 1 1|

%e|N||*|**|**|****|****|*****|

%e|K|A002260|1|1 2|1 2 3|1 2 3 4|1 2 4 5|

%e|||=|==|===|===|===|==|

%e||A138785|1|2 2|4 2 3|7 6 3 4|12 8 6 4 5|

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%e、。

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%电子||A127093|1|1 2|1 0 3|1 2 0 4|1 0 0 5|

%电子||---------|-----|-------|---------|-----------|-------------|

%电子||A127093||1|1 2|1 0 3|1 2 0 4|

%电子||---------|-----|-------|---------|-----------|-------------|

%e | D | A127093 | | | 1 | 1 2 | 1 0 3|

%e|I|A127093||1|1 2 |1 0 3|

%电子|V|---------|-----|-------|---------|-----------|-------------|

%e|I|A127093|||1|1 2|

%e|S|A127093|||1|1 2|

%电子|O|A127093|||1|1 2|

%电子|R|---------|-----|-------|---------|-----------|-------------|

%电子|S|A127093||||1|

%电子||A127093||||1|

%电子||A127093||||1|

%电子||A127093||||1|

%电子||A127093||||1|

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%e、。

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%电子||A127093|1|1 2|1 0 3|1 2 0 4|1 0 0 5|

%电子|C|A127093||1|1 2|1 0 3|1 2 0 4|

%e|O|-|||2|2 4 |2 0 6|

%e|N|-||||3|3 6|

%e | D |-| | | | ||5|

%e(电子)|---|---------|-----|-------|---------|-----------|-------------|

%e、。

%e表中较低的区域是“除数”区域的浓缩版本。

%t A127093行[n_]:=表格[Boole[Divisible[n,k]]k,{k,n}];

%t A340011行[n_]:=扁平[表[A127093行[n-m+1]分区P[m-1],{m,n}]];

%t阵列[A340011行,10](*Paolo Xausa_,2023年9月28日*)

%Y行总和表示A066186。

%Y非零项表示A340056。

%Y参见A000070、A000041、A002260、A026792、A027750、A058399、A066633、A127093、A135010、A138121、A138785、A176206、A181187、A182703、A207031、A207383、A211992、A221529、A221530、A22153、A221649、A2210650、A237593、A245095、A302246、A30224、A336811、A33681、A33682、A337209、A338156、A339106、A339258、A3 39278、A339304、A340031、A340032、A340035、A340061。

%K nonn,标签

%氧1,3

%A _罗马E.波兰,2020年12月26日