编号：A191732-OEIS

搜索： 编号：a191732

显示1-1，共找到1个结果。

第页1

排序：关联|参考文献|数|被改进的|创建格式：长的|短的|数据

A191732号

分散A047202号（数字>1，与2或3或4模5同余）。

+0
20

1, 2, 5, 3, 8, 6, 4, 13, 9, 10, 7, 22, 14, 17, 11, 12, 37, 23, 28, 18, 15, 19, 62, 38, 47, 29, 24, 16, 32, 103, 63, 78, 48, 39, 27, 20, 53, 172, 104, 129, 79, 64, 44, 33, 21, 88, 287, 173, 214, 132, 107, 73, 54, 34, 25, 147, 478, 288, 357, 219, 178, 122, 89 (列表;桌子;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`有关弥散及其分形序列的背景讨论，请参见A191426号有关同余序列mod 3、mod 4或mod 5的离散，请参见A191655型,A191663号,A191667号,A191702号.` `...` `假设{2,3,4,5,6}被划分为{x1，x2}和{x3，x4，x5}。设S是大于1且与x1或x2模5同余的递增序列，T是大于1并与x3或x4或x5模5同义的递增序列。S中有10个序列，每个序列都与T中的一个（几乎）互补序列相匹配。20个序列中的每个序列都会产生色散，如下所示：` `...` `A191722号=分散度A008851号（0，1 mod 5和>1）` `A191723号=分散度A047215号（0，2 mod 5和>1）` `A191724号=分散度A047218号（0、3模块5和>1）` `A191725号=分散度A047208号（0、4模块5和>1）` `A191726号=分散度A047216号（1,2 mod 5和>1）` `A191727号=分散度A047219号（1,3 mod 5和>1）` `A191728号=分散度A047209号（1,4 mod 5和>1）` `A191729号=分散度A047221号（2,3 mod 5和>1）` `A191730型=分散度A047211号（2、4模块5和>1）` `A191731号=分散度A047204号（3、4模块5和>1）` `...` `A191732号=分散度A047202号（2,3,4模块5和>1）` `A191733号=分散度A047206号（1,3,4 mod 5和>1）` `A191734号=分散度A032793号（1,2,4 mod 5和>1）` `A191735号=分散度A047223号（1,2,3 mod 5和>1）` `A191736号=分散度A047205号（0,3,4 mod 5和>1）` `A191737号=分散度A047212号（0,2,4模块5且>1）` `1917年1月38日=分散度A047222号（0,2,3 mod 5和>1）` `A191739号=分散度A008854号（0,1,4模块5和>1）` `A191740号=分散度A047220型（0,1,3 mod 5和>1）` `A191741号=分散度A047217号（0,1,2 mod 5和>1）` `...` `有关这20个分散体的更多信息，请参见A191722号.` `...` `关于分散度A191722号-A191741号相关Mathematica程序中使用了“（a或b mod m）”和“（a、b或c mod m”类型序列的通用公式。`
	链接	`伊万·内雷廷，n=1时的n，a（n）表。.5050`
	例子	`西北角：` `1....2....3....4....7` `5....8....13...22...37` `6....9....14...23...38` `10...17...28...47...78` `11...18...29...48...79` `15...24...39...64...107`
	数学	`（程序生成递增序列f[n]的色散阵列t）` `r=40；r1=12；c=40；c1=12；` `a=2；b=3；c2=4；m[n_]：=如果[Mod[n，3]==0，1，0]；` `f[n]：=am[n+2]+bm[n+1]+c2m[n]+5层[（n-1）/3]` `表[f[n]，{n，1，30}](A047202号)` `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}]](A191732号)` `扁平[表[t[k，n-k+1]，{n，1，c1}，{k，1，n}]](A191732号)`
	交叉参考	`囊性纤维变性。A008851号,A047202号,A191722号,A191426号.`
	关键词	`非n,表`
	作者	`克拉克·金伯利2011年6月14日`
	状态	`经核准的`

第页1

搜索在0.004秒内完成