OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。

登录

OEIS由OEIS基金会的许多慷慨捐赠者.

 

提示 （来自的问候整数序列在线百科全书!) A333621 在Zeckendorf和其所有除数的对偶Zeckenderf表示中可被1的总数整除的数(2008年3月37日和A333618飞机). 0 1, 2, 4, 126, 416, 442, 3025, 4588, 9243, 10428, 11900, 15070, 18176, 19436, 20532, 26956, 28582, 32108, 33028, 35278, 35929, 37634, 47678, 50386, 61952, 69254, 74578, 88984, 93534, 95120, 96334, 100326, 102297, 142894, 144039, 145768, 147664, 152817, 163125, 183002 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,2 链接 n=1..40时的n，a（n）表。 示例 126是一个术语，因为2008年3月37日（126）=21和A333618飞机（126）=7都是126的除数。 数学 zeckDigSum[n_]：=长度[DeleteCases[NestWhileList[#-Fibonachi[Floor[Log[Sqrt[5]*#+3/2]/Log[GoldenRatio]]&，n，#>1&]，0]]； zeckDivDigSum[n_]：=除数总和[n，zeckDigSum[#]&]； fibTerms[n_]：=模块[{k=天花板[Log[GoldenRatio，n*Sqrt[5]]，t=n，fr={}}，While[k>1，If[t>=斐波那契[k]，AppendTo[fr，1]；t=t-斐波纳契[k]，附录[fr，0]]；k——]；fr]； dualZeckSum[n_]：=模块[{v=fibTerms[n]}，nv=长度[v]；i=1；当[i<=nv-2时，如果[v[i]]==1&v[i+1]]==0&&v[[i+2]]==0，v[i]=0；v[[i+1]]=1；v[[i+2]]=1；如果[i>2，i-=3]]；i++]；i=位置[v，_？（#>0&）]；如果[i=={}，0，总计[v[[i[[1，1]]-1]]]]]; dualZeckDivDigSum[n_]：=除数总和[n，dualZeck总和[#]&]； 选择[Range[10^4]，Divisible[#，zeckDivDigSum[#]]和&Divisible[#，dualZeckDiv DigSum[#]]&] 交叉参考 的交点A333619飞机和A333620型. 囊性纤维变性。A007895号,A112310号,2008年3月37日,A330711型,A333617飞机,A333618飞机. 上下文中的序列：A006314号 A326204型 2005年2月*A009595号 A018493号 A046035型 相邻序列：A333618飞机 A333619飞机 A333620型*A333622飞机 A333623型 A333624型 关键词 非n,基础 作者 阿米拉姆·埃尔达尔2020年3月29日 状态 已批准

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人员OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间：美国东部夏令时2024年5月22日21:38。包含372758个序列。（在oeis4上运行。）