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

登录

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

 

提示 （来自的问候整数序列在线百科全书！） A131967号 Farey分形序列。 4 1, 2, 1, 3, 2, 1, 4, 3, 5, 2, 1, 6, 4, 3, 5, 7, 2, 1, 8, 6, 4, 9, 3, 10, 5, 7, 11, 2, 1, 12, 8, 6, 4, 9, 3, 10, 5, 7, 11, 13, 2, 1, 14, 12, 8, 6, 15, 4, 9, 16, 3, 17, 10, 5, 18, 7, 11, 13, 19, 2, 1, 20, 14, 12, 8, 6, 15, 4, 21, 9, 16, 3, 17, 10, 22, 5, 18, 7, 11, 13, 19, 23, 2 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,2 评论 作为一个分形序列，A131967号正确地将自身包含为子序列（无限多次）。 步骤1：按顺序列出票价分数，如下所示： 订单1:0/1 1/1 订单2:0/1 1/2 1/1 订单3:0/1 1/3 1/2 2/3 1/1等。 第2步：当步骤1中的所有段都被连接起来，并且a/b的每个不同前导项只计数一次时，用其位置替换每个a/b，得到 1 2个 1 3 2 1 4 3 5 2等。 第3步：将第2步中找到的段串联起来。 参考文献 C.Kimberling，“分形序列和间隔”，Ars Combinatoria 45（1997）157-168。 链接 n=1..83时的n，a（n）表。 例子 四阶法利分数为 0 1/4 1/3 1/2 2/3 3/4 1，具有位置号 1 6 4 3 5 7 2，这是A131967号. 数学 法利[n_]：= 选择[联合@ 外侧压扁[除，范围[n+1]-1，范围[n]]，#≤1&]； 新位置[n]：= 模块[{长度=总计@阵列[EulerPhi，n]+1，f1=Farey[n]， f2=Farey[n-1]，to}， to=补码[Range[length]，Flatten[Position[f1，#]&/@f2]]； ReplacePart[Array[0&，length]， 内部[Rule，to，Range[length-length[to]+1，length]，List]]]； a[n_]：=压扁@ 表格[折叠[ ReplacePart[Array[newpos，i][[#2+1]]， 内部[规则， 压扁@位置[Array[newpos，i][[#2+1]]，0]，#1，List]]&， 数组[newpos，i][[1]，范围[i-1]]，{i，n}]； a【10】(*Birkas Gyorgy公司2011年2月21日*） 交叉参考 囊性纤维变性。A131968号. 上下文中的序列：133404年 A134627号 A064881号*A358120型 A329501型 A300670型 相邻序列：A131964号 A131965号 A131966号*A131968号 A131969号 A131970型 关键词 非n 作者 克拉克·金伯利2007年8月2日 状态 经核准的

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

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

上次修改时间：2024年6月5日14:50 EDT。包含373107个序列。（在oeis4上运行。）