|
%I M0081#67 2022年6月24日17:20:29
%S 1,1,1,2,1,1,3,2,3,1,1,4,3,2,4,1,1,5,4,5,5,2,5,3,4,4,5，
%T 2,5,3,4,5,6,1,7,6,5,4,7,7,5,7,7,7,5,3,7,7,7,4,5,6,7,1,8,7,6,5,4,7,3，
%U 8,5,7,2,7,5,8,3,7,4,5,6,7,8,1,1,9,8,7,6,5,9,4,7,3,8,5,1,7,9,5,8，3,7
%N行读取的三角形：第N行给出了N阶Farey级数的分母。
%D J.H.Conway和R.K.Guy，《数字书》，哥白尼出版社，纽约，1996年，第152页
%哈代和赖特，《数论导论》。第三版，牛津大学出版社，1954年，第23页。
%D W.J.LeVeque，《数论专题》。Addison-Wesley，雷丁，马萨诸塞州，2卷。，1956年，第1卷，第154页。
%D A.O.Matveev，Farey Sequences，De Gruyter，2017年。
%D.I.Niven和H.S.Zuckerman，《数字理论导论》。第二版，纽约威利出版社，1966年，第141页。
%D N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。
%H Alois P.Heinz，n的表格，n的a（n）=1..10563</a>
%H R.K.Guy，<a href=“/A005165/A005165.pdf”>强大的小数定律，Amer。数学。《95月刊》（1988），第8期，697-712。[带注释的扫描副本]
%H Andrey O.Matveev，<a href=“http://arxiv.org/abs/0801.1981“>Farey子序列中的相邻分数，arXiv:0801.1981[math.NT]，2008-2010。
%H Andrey O.Matveev，<a href=“https://github.com/andreyomatveev/farey-sequences网站“>Farey序列：勘误表+Haskell代码</a>
%H N.J.A.Sloane，stern-brocot.html“>斯特恩·布罗科或法利树</a>
%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/FareySequence.html“>票价序列</a>
%H<a href=“/index/St#Stern”>与Stern序列相关的序列的索引项</a>
%e 0/1，1/1；
%e 0/1、1/2、1/1；
%e 0/1、1/3、1/2、2/3、1/1；
%e 0/1、1/4、1/3、1/2、2/3、3/4、1/1；
%e 0/1、1/5、1/4、1/3、2/5、1/2、3/5、2/3、3/4、4/5、1/1；
%e…=A006842/A006843。
%p Farey:=proc（n）sort（convert（`union`（{0}，{seq（seq（m/k，m=1..k），k=1..n）}），list））end:seq（denom（Farey（i）），i=1..5）；#_Peter Luschny_，2009年4月28日
%t Farey[n_]：=并集[Flatten[Join[{0}，Table[a/b，{b，n}，{a，b}]]；压扁[表[分母[Farey[n]]，{n，9}]]（*_Robert G.Wilson v_，2004年4月8日*）
%t表[分母[FareySequence[n]]，{n，10}]//平展（*需要Mathematica版本10或更高版本*）（*Harvey P.Dale_，2016年10月4日*）
%o（PARI）行（n）={vf=[0]；对于（k=1，n，对于（m=1，k，vf=concat（vf，m/k））；）；vf=vecsort（集合（vf））；对于（i=1，#vf，print1（分母（vf[i]），“，”）；}\\_Michel Marcus_，2014年6月27日
%Y行n有A005728（n）项_Michel Marcus，2014年6月27日
%Y行求和得出A240877。
%Y参见A006842（分子）、A049455、A049466、A007305、A007306。
%Y另见A177405/A177407。
%K non，nice，frac，tabf
%O 1,4个
%A _N.J.A.斯隆_
%E更多条款摘自Robert G.Wilson v_，2004年4月8日
%E由R.J.Mathar_于2009年4月26日将偏移量（=第一行的顺序）更改为1
|
