|
|
A003602号 |
| Kimberling的转述是:如果n=(2k-1)*2^m,那么a(n)=k。 (原名M0145)
|
|
147
|
|
|
1, 1, 2, 1, 3, 2, 4, 1, 5, 3, 6, 2, 7, 4, 8, 1, 9, 5, 10, 3, 11, 6, 12, 2, 13, 7, 14, 4, 15, 8, 16, 1, 17, 9, 18, 5, 19, 10, 20, 3, 21, 11, 22, 6, 23, 12, 24, 2, 25, 13, 26, 7, 27, 14, 28, 4, 29, 15, 30, 8, 31, 16, 32, 1, 33, 17, 34, 9, 35, 18, 36, 5, 37, 19, 38, 10, 39, 20, 40, 3, 41, 21, 42
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,3
|
|
评论
|
从2的幂获得的分形序列。
序列是T^(oo)(1),其中T作用于单词w=w(1)w(2)。。w(m)如下所示:T(w)=“1”w(1)“2”w(2)“3”(…)“m”w(米)“m+1”。例如T(ab)=1a2b3。因此T(1)=112,T(T(1-贝诺伊特·克洛伊特2009年3月2日
请注意,迭代后编号运算符U(w)=w(1)1 w(2)2 w(3)3…会产生相同的极限序列,但前面附加了一个“1”,即1,1,2,1,3,2,4-格伦·惠特尼,2023年8月30日
在n的二进制展开中,首先吞掉右边的所有零,然后加1,同时吞掉现在出现的0位-拉尔夫·斯蒂芬2013年8月22日
“这是一个分形,因为我们从中删除所有正整数的第一个外观后,得到了相同的序列”——见科贝利和扎哈里斯库链接-罗伯特·威尔逊v,2018年6月3日
序列是与序列本身交错的正整数列表。如果偏移量合适(这里就是这种情况),那么这样一个自交序列的项是由其索引的奇数部分决定的。把这里给出的一些公式用文字表示,a(n)是n的奇数部分在奇数列表中的位置。
(结束)
a(n)也是a(a(n-1))和a(n-1)(包括a(0)=1)之间的项中不包含的最小正数-尼尔·格什·托伦斯基2023年3月7日
|
|
参考文献
|
米歇尔·里戈(Michel Rigo),《形式语言、自动机和数字系统》,第2卷。,威利,2014年。提及此序列-请参阅第2卷中的“序列列表”。
N.J.A.Sloane和Simon Plouffe,《整数序列百科全书》,学术出版社,1995年(包括该序列)。
|
|
链接
|
J.-P.Allouche和J.Shallit,k-正则序列的环,理论。计算机科学。,307 (2003), 3-29.
克里斯蒂安·科贝利和亚历山德鲁·扎哈里斯库,帕斯卡尔三角周围的长廊-数字动机,公牛。数学。社会科学。数学。Roumanie,Tome托梅·鲁马尼56(104)第1期,2013年,73-98页。
J.-P.Delahaye,La marelle算术《Pour la Science》,第360期,2007年10月。法语。
道格拉斯·伊恩努奇(Douglas E.Iannucci)和厄本·拉尔森(Urban Larsson),算术函数的博弈值,arXiv:2101.07608[math.NT],2021。
马蒂·范·森,马尔可夫谱的回文序列,arXiv:1804.10802[math.NT],2018年。
|
|
配方奶粉
|
a((2*k-1)*2^m)=k,对于m>=0和k>=1-罗伯特·威尔逊v2006年5月23日
通用公式:1/x*Sum_{k>=0}x^2^k/(1-2*x^2*(k+1)+x^2#(k+2))-拉尔夫·斯蒂芬2003年7月24日
a(2*n-1)=n和a(2*n)=a(n)Pab Ter(pabrlos2(AT)yahoo.com),2005年10月25日
G.f.满足G(x)=G(x^2)+x/(1-x^2)^2-罗伯特·伊斯雷尔2015年4月24日
|
|
例子
|
表的开头显示了与正整数的交错:
n a(n)(n+1)/2 a(n/2)
1 1 1
2 1 1
3 2 2
4 1 1
5 3 3
6 2 2
7 4 4
8第1页
9 5 5
10 3 3
11月6日
12 2 2
(结束)
|
|
MAPLE公司
|
A003602号:=proc(n)选项记住:如果n mod 2=1,则返回((n+1)/2)else RETURN(procname(n/2))fi:end proc:
nmax:=83:对于从0到ceil的m(simplize(log[2](nmax))),do对于从1到ceil(nmax/(m+2))的k,do a((2*k-1)*2^m):=k od:od:seq(a(k),k=1.nmax)#约翰内斯·梅耶尔2013年2月4日
a:=1;
ifactors(n)[2]中的p do
如果op(1,p)>2,则
a:=a*op(1,p)^op(2,p);
结束条件:;
结束do:
(a+1)/2;
|
|
数学
|
a[n_]:=块[{m=n},而[EvenQ@米,m/=2];(m+1)/2];数组[a,84](*或*)
a[1]=1;a[n_]:=a[n]=如果[奇数Q@n,(n+1)/2,a[n/2]];数组[a,84](*罗伯特·威尔逊v2006年5月23日*)
a[n_]:=天花板[NestWhile[Floor[#/2]&,n,EvenQ]/2];数组[a,84](*Birkas Gyorgy公司2011年4月5日*)
a003602={1};最大值=7;Do[b={};Do[AppendTo[b,{k,a003602[[k]]}],{k,Length[a03602]]}];a003602=压扁[b],{n,2,最大}];a003602号(*L.埃德森·杰弗里2015年11月21日*)
|
|
黄体脂酮素
|
(哈斯克尔)
a003602=(`div`2)。(+ 1) . a000265号
(哈斯克尔)
导入数据。列表(转置)
a003602=翻转div 2。(+ 1) . a000265号
a003602_list=连接$转置[[1..],a003602_list]
(Python)
导入数学
定义a(n):返回(n/2**int(math.log(n-(n&n-1),2))+1)/2#印地瑞尼Ghosh2017年4月24日
(Python)
定义A003602号(n) :return(n>>(n&-n).bit_length())+1#柴华武2022年7月8日
|
|
交叉参考
|
囊性纤维变性。A000079号,A000265号,A001511号,A003603型,A003961号,A014577号(具有偏移量1、减少mod 2),A025480号,A035528号,A048673号,A101279号,A110963号,A117303年,A126760号,A181988号,A220466型,A249745型,A253887型,A337821型(2-adic估值)。
|
|
关键字
|
|
|
作者
|
|
|
扩展
|
更多条款来自Pab Ter(pabrlos2(AT)yahoo.com),2005年10月25日
|
|
状态
|
经核准的
|
|
|
|