编号：A191728-OEIS

搜索： 编号：a191728

显示1-1个结果（共1个）。

第页1

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

A191728号

分散A047209号，（数字>1，等于1或4 mod 5），由反对角线表示。

+0
20

1, 4, 2, 11, 6, 3, 29, 16, 9, 5, 74, 41, 24, 14, 7, 186, 104, 61, 36, 19, 8, 466, 261, 154, 91, 49, 21, 10, 1166, 654, 386, 229, 124, 54, 26, 12, 2916, 1636, 966, 574, 311, 136, 66, 31, 13, 7291, 4091, 2416, 1436, 779, 341, 166, 79, 34, 15, 18229, 10229 (列表;桌子;图表;参考;听;历史;文本;内部格式)

	抵消	`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）` `1917年1月23日=分散度A047215号（0，2 mod 5和>1）` `2017年1月24日=分散度A047218号（0、3模块5和>1）` `A191725号=分散度A047208号（0、4模块5和>1）` `A191726号=分散度2016年0月47216日（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模式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）` `A191738号=分散度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..5050时的n，a（n）表`
	例子	`西北角：` `1....4....11...29....74` `2....6....16...41....104` `3…9…24…61…154` `5....14...36...91....229` `7....19...49...124...311` `8....21...54...136...341`
	数学	`（程序生成递增序列f[n]的色散阵列t）` `r=40；r1=12；c=40；c1=12；` `a=4；b=6；m[n_]：=如果[Mod[n，2]==0，1，0]；` `f[n]：=am[n+1]+bm[n]+5层[（n-1）/2]` `表[f[n]，{n，1，30}](A047209号)` `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}]](A191728号)` `扁平[表[t[k，n-k+1]，{n，1，c1}，{k，1，n}]](A191728号*)`
	交叉参考	`囊性纤维变性。A047222号,A047209号,A191738号,A191722号,A191426号。`
	关键词	`非n,表格`
	作者	`克拉克·金伯利，2011年6月13日`
	状态	`经核准的`

第页1

搜索在0.004秒内完成