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

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a073334-编号:a073333
显示1-1,共找到1个结果。 第页1
    排序:关联|参考文献||被改进的|已创建     格式:长的|短的|数据
A286619型 为过滤器序列计算的限制增长序列A278219型,与n的二进制表示中的运行长度有关。 +10
20
1, 2, 3, 2, 3, 4, 5, 2, 3, 6, 7, 4, 5, 6, 5, 2, 3, 6, 8, 6, 7, 9, 10, 4, 5, 11, 10, 6, 5, 6, 5, 2, 3, 6, 8, 6, 8, 12, 13, 6, 7, 14, 15, 9, 10, 12, 10, 4, 5, 11, 13, 11, 10, 14, 13, 6, 5, 11, 10, 6, 5, 6, 5, 2, 3, 6, 8, 6, 8, 12, 13, 6, 8, 16, 17, 12, 13, 16, 13, 6, 7, 14, 17, 14, 15, 18, 19, 9, 10, 20, 21, 12, 10, 12, 10, 4, 5, 11, 13, 11, 13, 20, 22, 11, 10 (列表;图表;参考;;历史;文本;内部格式)
偏移
0,2
评论
当过滤序列(通过等价类划分)时,可以使用此序列代替A278219型,因为对于所有i,j,它认为:a(i)=a(j)<=>A278219型(i)=A278219型(j) 。
例如,对于所有i,j:a(i)=a(j)=>A005811号(i)=A005811号(j) ●●●●。(对于A073334号,因为它是根据A005811号).
链接
数学
f[n_,i_,x_]:=其中[n==0,x,EvenQ@n,f[n/2,i+1,x],真,f[(n-1)/2,i,x素数@i]];g[n_]:=如果[n==1,1,Times@@MapIndexed[Prime[First@#2]^#1&,Sort[FactorInteger[n][[All,-1]],Greater]]];使用[{nn=99},函数[s,表[Position[Keys@s,k_/;MemberQ[k,n]][1,1]],{n,nn}]@Map[#1->#2&@@#&,Transpose@{Values@#,Keys@#}]&@PositionIndex@Table[g@f[BitXor[n,Floor[n/2]],1,{n、0,nn}](*迈克尔·德弗利格,2017年5月12日,第10版*)
黄体脂酮素
(PARI)
rgs_transform(invec)={my(occurrences=Map(),outvec=vector(length(invec)),u=1);对于(i=1,length,invec,if(mapisdefined(occurements,invec[i]),my(pp=mapget(occursions,invec[i];
write_to_bfile(start_offset,vec,bfilename)={对于(n=1,长度(vec),write(bfilename,(n+start_offset)-1,“”,vec[n]);}
A005940号(n) ={my(p=2,t=1);n--;直到(!n\=2,if((n%2),(t*=p),p=nextprime(p+1));t};\\根据的代码修改M.F.哈斯勒
A046523号(n) ={my(f=vecsort(factor(n)[,2],4),p);prod(i=1,#f,(p=nextprime(p+1))^f[i]);};\\此函数来自查尔斯·格里特豪斯四世2011年8月17日
A278222型(n)=A046523号(A005940号(1+n));
A003188号(n) =位或(n,n>>1);
A278219型(n)=A278222型(A003188号(n) );
写入to_b文件(0,rgs_transform(向量(65538,n,A278219型(n-1)),“b286619.txt”);
交叉参考
囊性纤维变性。A278219型,A005811号,A073334号.
关键词
非n,
作者
安蒂·卡图恩2017年5月11日
状态
经核准的
第页1

搜索在0.005秒内完成

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

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

上次修改时间:2024年4月18日22:18 EDT。包含371782个序列。(在oeis4上运行。)