登录
A100549号
设n=2^e_2*3^e_*5^e_*。。。是n的素因式分解;则a(n)=最大素数<=1+max{e2,e3,e5,…};a(1)=1按惯例。
6
1, 2, 2, 3, 2, 2, 2, 3, 3, 2, 2, 3, 2, 2, 2, 5, 2, 3, 2, 3, 2, 2, 2, 3, 3, 2, 3, 3, 2, 2, 2, 5, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 3, 2, 2, 5, 3, 3, 2, 3, 2, 3, 2, 3, 2, 2, 2, 3, 2, 2, 3, 7, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 3, 3, 2, 2, 2, 5, 5, 2, 2, 3, 2, 2, 2, 3, 2, 3, 2, 3, 2, 2, 2, 5, 2, 3, 3, 3, 2, 2, 2, 3, 2
抵消
1,2
链接
David Applegate和N.J.A.Sloane,n=1..10000时的n,a(n)表
例子
如果n=8=2^3,a(n)=(最大素数<=3+1)=3。
如果n=480=2^5*3*5,a(n)=(最大素数<=1+max{5,1,1})=5。
MAPLE公司
#如果n=prod_p^e_p,则
#pp=最大素数<=1+最大e_p
带有(数字理论):
pp:=proc(n)局部f,m;选项记忆;
如果(n=1),则
返回1;
结束条件:;
米:=1:
对于op(2..-1,ifactors(n))中的f,do
如果(f[2]>m),则
m:=f[2]:
结束条件:;
结束do;
预素数(m+2);
终末程序;
数学
{1} ~加入~阵列[Prime@PrimePi[1 + 最大@FactorInteger[#][[全部,-1]]&,105,2](*迈克尔·德弗利格2018年11月13日*)
黄体脂酮素
(PARI)a(n)=如果(n==1,1,precprime(1+vecmax(factor(n)[,2]~)))\\米歇尔·马库斯2018年11月14日
关键词
非n
作者
状态
经核准的