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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A126433号 根据素数的Erdős-Selfridge分类,类别+素数(n)。 8
1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 3, 2, 2, 1, 1, 2, 2, 2, 1, 4, 2, 2, 2, 2, 2, 3, 1, 2, 3, 1, 2, 2, 2, 2, 3, 3, 3, 2, 3, 2, 3, 1, 3, 2, 2, 2, 2, 3, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 3, 4, 2, 3, 3, 3, 2, 3, 2, 2, 2, 3, 1, 3, 3, 3, 3, 2, 3, 1, 2, 2, 4, 2, 3, 2, 3, 3, 2, 3, 3, 2, 2, 2, 3, 3, 3, 3, 2, 2, 3, 3 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,6
评论
a(n)=1,如果A000040型(n) 在中A005105号.a(n)=2,如果A000040型(n) 在中A005106号,如果为in,a(n)=3A005107号等。记录的位置隐含在A005113号.
链接
MAPLE公司
A126433号:=进程(n)
选项记忆;
局部p、pf、e、a;
如果是素数(n),则
pf:=系数(n+1)[2];
a:=1;
对于e从1到nops(pf)do
p:=op(1,op(e,pf));
如果p>3,则
a:=最大值(a,工艺名称(p)+1);
结束条件:;
结束do;
a;
其他的
-1;
结束if;
结束过程:
序列(A126433号(i质数(n)),n=1..100);
A126433号:=n->如果n>0,则A126433号(-ithprime(n))else numtheory[因子集](1-n);如果%subset{2,3},则1其他1+max(seq(A126433号(-i),i=%)fi-fi;地图(%,[1..999]美元)#M.F.哈斯勒2007年4月2日
数学
classPlus[p_]:=classPlus[p]=如果[f=FactorInteger[p+1][[All,1]];q=最后[f];q==2||q==3,1,最大值[classPlus/@f]+1];classPlus/@Prime/@Range[105](*Jean-François Alcover公司2013年6月24日*)
黄体脂酮素
(PARI)A126433号(n) ={如果(n>0,n=-素数(n));n=因子(1-n)[,1];如果(n[#n]>3,vecsort(向量(#n,i,A126433号(-n[i]))[n]+1,1)};矢量(999,i,A126433号(i) )
交叉参考
囊性纤维变性。A101253号.
关键词
非n
作者
R.J.马塔尔2007年3月23日
状态
已批准

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

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

上次修改时间:2024年4月16日12:52 EDT。包含371711个序列。(在oeis4上运行。)