A357581-OEIS公司

A357581型

由数字的反对角线读取的平方数组，这些数字的对称表示仅由宽度为1的部分组成；列k表示部件的数量，行n表示每列中按递增顺序的第n个数字。

1, 2, 3, 4, 5, 9, 8, 7, 25, 21, 16, 10, 49, 27, 81, 32, 11, 50, 33, 625, 147, 64, 13, 98, 39, 1250, 171, 729, 128, 14, 121, 51, 2401, 207, 15625, 903, 256, 17, 169, 55, 4802, 243, 31250, 987, 3025, 512, 19, 242, 57, 14641, 261, 117649, 1029, 3249, 6875 (列表;桌子;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`这个序列是A174905号.表格中偶数列中的数字A241008型奇数列中的形成A241010型。表格的第一行是A318843型.` `此序列是A240062型该序列中的每一列都是A240062型.`
	链接	`n=1..55时的n、a（n）表。`
	例子	`表的左上角11 X 11部分表示a（n）<=210^7：` `1 2 3 4 5 6 7 8 9 10 11 ...` `----------------------------------------------------------------------` `1 3 9 21 81 147 729 903 3025 6875 59049` `2 5 25 27 625 171 15625 987 3249 7203 9765625` `4 7 49 33 1250 207 31250 1029 4761 13203 19531250` `8 10 50 39 2401 243 117649 1113 6561 13527 ...` `16 11 98 51 4802 261 235298 1239 7569 14013 ...` `32 13 121 55 14641 275 1771561 1265 8649 14499 ...` `64 14 169 57 28561 279 3543122 1281 12321 14661 ...` `128 17 242 65 29282 333 4826809 1375 14161 15471 ...` `256 19 289 69 57122 363 7086244 1407 15129 15633 ...` `512 22 338 85 58564 369 9653618 1491 16641 15957 ...` `1024 23 361 87 83521 387 19307236 1533 17689 16119 ...` `...` `每列k>1包含奇数和偶数，因为5^（k-1）和25^。` `第1列：A000079号，的子序列A174973号=A238443型，第1列的A240062型.` `第2列：A246955型，的子序列A239929型; 78是不在的最小数字A246955型.` `第3列：A247687型，的子序列A279102型; 15是不在中的最小数字A247687型.` `第3列中的奇数：A001248号（k），k>1。` `第4列：A264102型，的子序列A280107型; 75是不在中的最小数字A264102型.` `第5列：A320066型; 63 =A320066型（1）不在第5列中。` `第5列中的数字的形式为2^kp^4，p>2素数，0<=k<下限（log_2（p））。` `第5列中的奇数：A030514型（k），k>1。` `第6列：320511美元; 189是第6列以外的最小数字。` `第6列中最小的偶数是5050。` `第7列：数字的形式为2^kp^6，p>2素数，0<=k<floor（log_2（p））。` `第7列中的奇数：A030516型（k），k>1。` `第n素数p_n列中的数字的形式为：2^k*p^（p_n-1），p>2素数，0<=k<下限（log_2（p_n））。`
	数学	`（函数a341969和支持函数定义于A341969型,A341970型和A341971飞机)` `width1Table[n_，{r_，c_}]：=模块[｛k，list=表[｛｝，c]，wL，wLen，pCount，colLen｝，对于[k=1，k<=n，k++，wL=a341969[k]；wLen=长度[wL]；p计数=（wLen+1）/2；如果[pCount<=c&&Length[list[[pCount]]]<r&&SubsetQ[{0，1}，Union[wL]]，AppendTo[list[pCount]]，k]]]；转置[PadRight[list，{c，r}，“…”]]` `a357581[n_，r_]：=模块[{arr=width1Table[n，{r，r}]，vec=Table[0，PolygonalNumber[r]]，i，j}，对于[i=1，i<=r，i++，对于[j=r-i+1，j>=1，j--，vec[[PolygonalNumber[i+j-2]+j]]=arr[[i，j]]]；vec]` `a357581T[n_，r_]：=表格形式[width1Table[n，{r，r}]]` `a357581[120000，10]（序列数据-前10个反诊断）` `a357581T[120000，10]（左上角10x10阵列）` `a357581T[200000000，11]（11x11阵列-非常长的计算时间）`
	交叉参考	`囊性纤维变性。A000079号,A001248号,A030514型,A030516型,A174905号,A174973号,A237593型,A238443型,A239929型,2008年2月24日,A241010型,A246955型,A247687型,A264102型,A279102型,A280107型,A318843型,2006年3月6日,A320511型,A341969型,A341970型,A341971飞机.` `上下文中的序列：A371152型 A266531型 A284311型A174225号 A182945号 A360069型` `相邻序列：A357578飞机 A357579飞机 575580英镑A357582型 A357583型 A357584型`
	关键词	`非n,表`
	作者	`哈特穆特·F·W·霍夫特2022年10月4日`
	状态	`经核准的`