OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A286626型 为基元相关过滤序列计算的限制增长序列A278226型. 20
1, 2, 2, 3, 4, 5, 2, 3, 3, 6, 5, 7, 4, 5, 5, 7, 8, 9, 10, 11, 11, 12, 13, 14, 15, 16, 16, 17, 18, 19, 2, 3, 3, 6, 5, 7, 3, 6, 6, 20, 7, 21, 5, 7, 7, 21, 9, 22, 11, 12, 12, 23, 14, 24, 16, 17, 17, 25, 19, 26, 4, 5, 5, 7, 8, 9, 5, 7, 7, 21, 9, 22, 8, 9, 9, 22, 27, 28, 13, 14, 14, 24, 29, 30, 18, 19, 19, 26, 31, 32, 10, 11, 11, 12, 13, 14, 11, 12, 12, 23, 14, 24 (列表;图表;参考;;历史;文本;内部格式)
偏移
0,2
评论
当过滤序列(通过等价类划分)时,可以使用此序列(及其适度大小的术语)来代替A278226型,因为对于所有i,j,它认为:a(i)=a(j)<=>A278226型(i)=A278226型(j) ●●●●。
例如,对于所有i,j:a(i)=a(j)=>A276150型(i)=A276150型(j) ●●●●。
链接
数学
b=混合基数[反转@基本值@范围@12];f[n_]:=Times@@MapIndexed[Prime[#2]^#1&,Sort[FactorInteger[n][[All,-1]],Greater]]-布尔[n==1];使用[{nn=102},函数[s,表[Position[Keys@s,k_/;MemberQ[k,n]][[1,1]],{n,nn}]@Map[#1->#2&@@#&,Transpose@{Values@#,Keys@#}]&@PositionIndex@Table[Function[k,f[Times@@Power@@#&@Transpose@@Prime@Range@Length@k,Reverse@k}]@整数位数[n,b],{,0,nn}]](*迈克尔·德弗利格,2017年5月12日,10.2*版)
黄体脂酮素
(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]);}
A046523号(n) ={my(f=vecsort(factor(n)[,2],4),p);prod(i=1,#f,(p=nextprime(p+1))^f[i]);};\\此函数来自查尔斯·格里特豪斯四世2011年8月17日
A276086型(n) ={my(i=0,m=1,pr=1,nextpr);while(n>0),i=i+1;nextpr=素数(i)*pr;if;
A278226型(n)=A046523号(A276086型(n) );
写入to_b文件(0,rgs_transform(向量(30031,n,A278226型(n-1)),“b286626.txt”);
交叉参考
囊性纤维变性。A278226型,A276150型.
关键词
非n,
作者
安蒂·卡图恩2017年5月11日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月18日01:32。包含373468个序列。(在oeis4上运行。)