A191451-OEIS公司

1914年1月51日

当n>=2时，（3n-2）通过反对偶体的分散。

1, 4, 2, 13, 7, 3, 40, 22, 10, 5, 121, 67, 31, 16, 6, 364, 202, 94, 49, 19, 8, 1093, 607, 283, 148, 58, 25, 9, 3280, 1822, 850, 445, 175, 76, 28, 11, 9841, 5467, 2551, 1336, 526, 229, 85, 34, 12, 29524, 16402, 7654, 4009, 1579, 688, 256, 103, 37, 14, 88573 (列表;桌子;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`第1行：A003462号` `第2行：A060816型` `背景讨论：假设s是正整数的递增序列，s的补码t是无限的，并且t（1）=1。s的离散度是数组D，其第n行是（t（n），s（t（n）），s。每个正整数在D中只出现一次，所以作为一个序列，D是正整数的置换。由u（n）=（包含n的D的行数）给出的序列u是一个分形序列。示例：` `（1）秒=A000040型（素数），D=A114537号，单位=A114538号.` `（2）秒=A022343号（无首字母0），D=A035513号（威瑟夫阵列），u=A003603型.` `（3）秒=A007067号，D=A035506号（Stolarsky阵列），u=A133299号.` `分散的最新示例：A191426号-A191455号.`
	链接	`n，a（n）的表，n=1..56。`
	例子	`西北角：` `1...4....13...40...121` `2...7....22...67...202` `3...10...31...94...283` `5...16...49...148..445` `6...19...58...175..526`
	数学	`（程序生成递增序列f[n]的色散阵列T）` `r=40；r1=12；c=40；c1=12；` `f[n]：=3n+1（第1列的补码）` `mex[list_]：=NestWhile[#1+1&，1，并集[list][[#1]]<=#1&，1、长度[Union[list]]]` `行={NestList[f，1，c]}；` `Do[rows=Append[rows，NestList[f，mex[Flatten[rows]]，r]]，{r}]；` `t[i_，j_]：=行[[i，j]]；` `表格形式[表格[t[i，j]，{i，1，10}，{j，1，10}]]` `(A191451号数组）` `压扁[表[t[k，n-k+1]，{n，1，c1}，{k，1，n}]](A191451号序列）` `（编程人彼得·J·C·摩西2011年6月1日）`
	交叉参考	`囊性纤维变性。A114537号,A035513号,A035506号,A191449号.` `上下文中的序列：A069836美元 A224820型 125153英镑A193950型 A180194号 A193853号` `相邻序列：A191448号 A191449号 A191450型A191452号 A191453号 A191454号`
	关键词	`非n,表`
	作者	`克拉克·金伯利，2011年6月5日`
	状态	`已批准`