%I M0161#103 2022年10月22日08:05:41

%S 1,2,1,4,1,2,1,1,8,1,2,1,4,1,2,1,9,1,2,4,1,1,2,1,8,12,4,12,1,10,1,2，

%T 1,4,1,2,1,1,8,1,2,1,4,1,2,1,9,1,2,4,1,1,2,1,8,12,4,12,1,2,4，

%U 1,2,1,8,1,2,1,4,1,2,1,9,1,2,4,1,8,1,2,1,4,1,2,1,2,1,2,1,4,2

%N Radon函数，也称为Hurwitz-Radon数。

%C该序列与A006519（2除以n的最大幂）非常相似，除第16项外，差值均为零（非零差值见A101119）_西蒙·普劳夫（Simon Plouffe），2004年12月2日

%对于所有与2^k（mod 2^（k+1））同余的n，a（n）是相同的。因此，对于任何自然数m，前2^m-1项的列表都是回文的_Ivan N.Ianakiev，2019年7月21日

%C以奥地利数学家约翰·拉东（1887-1956）和德国数学家阿道夫·赫尔维茨（1859-1919）的名字命名_Amiram Eldar，2021年6月15日

%D T.Y.Lam，二次型代数理论。本杰明，雷丁，马萨诸塞州，1973年，第131页。

%D Takashi Ono，《欧拉主题变奏曲》，Plenum，纽约，1994年，第192页。

%D A.R.Rajwade，坎普斯广场。大学出版社，伦敦数学。Soc.课堂讲稿系列1711993；见第127页。

%D N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。

%H T.D.Noe，n的表格，n的a（n）=1..10000</a>

%H J.弗兰克·亚当斯，<a href=“http://dx.doi.org/10.1016/0040-9383（62）90096-4“>球面上的向量场，拓扑，第1卷（1962年），第63-65页。

%H J.弗兰克·亚当斯，<a href=“https://doi.org/10.1090/S0002-9904-1962-10693-4“>球体上的向量场</a>，美国数学学会，第68卷（1962年），第39-41页。

%H J.Frank Adams，<a href=“http://www.jstor.org/stable/1970213“>球体上的向量场，《数学年鉴》，第75卷（1962年），第603-632页。

%H J.-P.Allouche和J.Shallit，<a href=“http://www.math.jussieu.fr/~allouche/kreg2.ps“>k-正则序列环，II</a>。

%H J.-P.Allouche和J.Shallit，<a href=“http://dx.doi.org/10.1016/S0304-3975（03）00090-2“>k-正则序列的环，II</a>，《计算机科学理论》，第307卷（2003），第3-29页。

%H Adolf Hurwitz，<a href=“http://gdz.sub.uni-goettingen.de/dms/load/img/？PID=GDZPPN002269074“>Uber die Komposition der quadratischen formen，《数学年鉴》，第88卷（1923年），第1-25页。

%H Michel A.Kervaire，<A href=“http://www.pnas.org/content/44/3/280.full.pdf“>n>7时球体的非平行性，美国国家科学院院刊，第44卷，第3期（1958年），第280-283页。

%H John Milnor，<a href=“http://www.jstor.org/stable/1970255“>博特定理的一些结果，《数学年鉴》，第二辑，第68卷，第2期（1958年），第444-449页。

%H Johann Radon，<a href=“https://doi.org/10.1007/BF02940576“>Lineare scharen正交矩阵，汉堡大学数学博士，第1卷（1922年），第1-14页。

%H Daniel B.Shapiro，致N.J.a.Sloane的信，1974年。

%H<a href=“/index/Cor#core”>“core”序列的索引条目。

%F a（n）=A003485（A007814（n））。

%F如果n=2^（4*b+c）*d，0<=c<=3，d为奇数，则a（n）=8*b+2^c。

%F如果n=2^m*d，d为奇数，则a（n）=2*m+1如果m=0 mod 4，a（n。

%F与a（p^e）=2e+a_（e mod 4）相乘，如果p=2；如果p>2，则为1；其中a=（1，0，0，2）。-_David W.Wilson_，2001年8月1日

%F Dirichlet g.F.zeta（s）*（1-1/2^s）*{7*2^（-4*s）+1+2^（3-3*s_R.J.Mathar，2011年3月4日

%F a（A005408（n））=1；a（2*n）=A209675（n）；a（A016825（n））=2；a（A017113（n））=4；a（A051062（n））=8_Reinhard Zumkeller_，2012年3月11日

%F a（（2*n-1）*2^p）=A003485（p），p>=0.-_Johannes W.Meijer，2011年6月7日，2012年12月15日

%F Lambert级数g.F.求和_（k>=0）q^（2^（4*k））/（1-q^_Mamuka Jibladze_，2016年12月7日

%F渐近平均值：极限{m->oo}（1/m）*和{k=1..m}a（k）=8/3_Amiram Eldar，2022年10月22日

%e.G.f.=x+2*x^2+x^3+4*x^4+x^5+2*x*6+x^7+8*x^8+x^9+。。。

%p readlib（ifactors）：对于从1到150的n，如果n mod 2=1，则执行printf（`%d，`，1）fi:如果n mod 2=0，则执行m：=ifactors（n）[2]：如果m mod 4=0，则打印f（`%1，`，2*m+1）fi:如果m mod 4=1，则执行打印f（`%d，'，2*m，2*m+2）fi:fi:od:#_James A.Sellers_，2000年12月7日

%p最大值：=102；A003485:=proc（n）:A003485（n）：=ceil（（n+1）/4）+ceil（n/4）+2*ceil（n-1）/4 seq（A003484（n），n=1..nmax）；#_Johannes W.Meijer，2011年6月7日，2012年12月15日

%t a[n_]：=8*商[IntegerExponent[n，2]，4]+2^Mod[Integer指数[n，2]，4]；表[a[n]，{n，1，102}]（*_Jean-François Alcover_，2011年9月8日，以Paul D.Hanna_*命名）

%o（PARI）a（n）=8*（估值（n，2）\4）+2^（估值（n，2）%4）/*_Paul D.Hanna，2004年12月2日*/

%o（哈斯克尔）

%o a003484 n=2*e+循环[1,0,0,2]！！e，其中e=a007814 n

%o——Reinhard Zumkeller，2012年3月11日

%o（Python）

%o定义A003484（n）：返回（（（m:=（~n&n-1）.bit_length（））&-4）<<1）+（1<<（m&3））#_Chai Wah Wu_，2022年7月9日

%Y有关密切相关的序列，请参见A053381。

%Y参见A003485、A006519、A007814、A10119。

%K non，easy，core，nice，mult

%O 1,2号机组

%A _N.J.A.斯隆_

%E更多来自Larry Reeves（larryr（AT）acm.org）的术语，2000年3月20日