显示找到的4个结果中的1-4个。
第页1
a(1)=1,a(2)=2;对于n>2,a(n)是未出现的最小正数,是最小素因子的倍数,最小指数为a(n-1)(参见。A067695号).
+20 4
1, 2, 4, 6, 8, 10, 12, 3, 9, 15, 18, 14, 16, 20, 5, 25, 30, 22, 24, 21, 27, 33, 36, 26, 28, 7, 35, 40, 45, 50, 32, 34, 38, 42, 44, 11, 55, 60, 39, 48, 51, 54, 46, 52, 13, 65, 70, 56, 49, 63, 77, 84, 57, 66, 58, 62, 64, 68, 17, 85, 75, 69, 72, 78, 74, 76, 19, 95, 80, 90, 82, 86, 88, 99, 110
评论
序列被推测为正整数的置换。在任何时候出现质数p的前500000项中,其中p>=5,以下项为5p。目前尚不清楚这是否适用于所有素数。在相同的范围内,固定点为1、2、9、39、49、1079、4897,尽管可能存在更多的固定点。
例子
a(4)=6作为a(3)=4=2*2,其中A067695号(4) =2是指具有最小指数的最小素因子,6是指未使用的最小数,是2的倍数。
a(8)=3作为a(7)=12=2*3,其具有A067695号(12) =3是指具有最小指数的最小素数因子,3是指未使用的最小数,是3的倍数。
数学
nn=75,c[_]=0;数组[Set[{a[#],c[#]},{#,#}]&,2];u=3;Do[p=MinimalBy[FactorInteger@a[i-1],Last][[1,1]];k=u;而[Nand[c[k]==0,可除[k,p]],k++];集合[{a[i],c[k]},{k,i}];如果[k==u,而[c[u]>0,u++]],{i,长度[s]+1,nn}];数组[a,nn](*迈克尔·德弗利格2022年4月18日*)
0, 1, 2, 1, 3, 1, 4, 1, 2, 1, 5, 2, 6, 1, 2, 1, 7, 1, 8, 3, 2, 1, 9, 2, 3, 1, 2, 4, 10, 1, 11, 1, 2, 1, 3, 1, 12, 1, 2, 3, 13, 1, 14, 5, 3, 1, 15, 2, 4, 1, 2, 6, 16, 1, 3, 4, 2, 1, 17, 2, 18, 1, 4, 1, 3, 1, 19, 7, 2, 1, 20, 2, 21, 1, 2, 8, 4, 1, 22, 3, 2, 1
评论
n的素数指数是一个数m,使得素数(m)除以n。n的多素数指数集是A112798号.
我们将多集合中的共模定义为最多与其他元素出现次数相同的元素。例如,{a、a、b、b、b、b、c、c}中的共模是{a、c}。
例子
2100年的素数指数为{1,1,2,3,3,4},共模为{2,4}。因此a(2100)=2。
数学
prix[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
comodes[ms_]:=选择[Union[ms],Count[ms,#]<=最小值@@Length/@Split[ms]&];
表[If[n==1,0,Min[comodes[prix[n]]],{n,30}]
0, 1, 2, 1, 3, 2, 4, 1, 2, 3, 5, 2, 6, 4, 3, 1, 7, 1, 8, 3, 4, 5, 9, 2, 3, 6, 2, 4, 10, 3, 11, 1, 5, 7, 4, 2, 12, 8, 6, 3, 13, 4, 14, 5, 3, 9, 15, 2, 4, 1, 7, 6, 16, 1, 5, 4, 8, 10, 17, 3, 18, 11, 4, 1, 6, 5, 19, 7, 9, 4, 20, 2, 21, 12, 2, 8, 5, 6, 22, 3, 2
评论
n的素数指数是一个数m,使得素数(m)除以n。n的多素数指数集是A112798号.
我们将多集合中的共模定义为最多与其他元素出现次数相同的元素。例如,{a、a、b、b、b、b、c、c}中的共模是{a、c}。
例子
2100年的素数指数为{1,1,2,3,3,4},共模为{2,4}。因此a(2100)=4。
数学
prix[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
comodes[ms_]:=选择[Union[ms],Count[ms,#]<=最小值@@Length/@Split[ms]&];
表[If[n==1,0,Max[comodes[prix[n]]],{n,30}]
2, 3, 2, 5, 3, 7, 2, 3, 5, 11, 3, 13, 7, 5, 2, 17, 2, 19, 5, 7, 11, 23, 3, 5, 13, 3, 7, 29, 5, 31, 2, 11, 17, 7, 3, 37, 19, 13, 5, 41, 7, 43, 11, 5, 23, 47, 3, 7, 2, 17, 13, 53, 2, 11, 7, 19, 29, 59, 5, 61, 31, 7, 2, 13, 11, 67, 17, 23, 7, 71, 3, 73, 37, 3
评论
当检查n的正则表示的最小指数时,a(n)是这些素数中最大的,而A067695号(n) 是最小的。
例子
a(162)=a(2^1*3^4)=2。
a(225)=a(3^2*5^2)=5。
MAPLE公司
a: =n->(l->(m->最大值(映射(i->i[1]),选择(y->y[2]=m,
l) ))(最小值(映射(x->x[2],l)))(ifactors(n)[2]):
数学
a[n_]:=模块[{f=FactorInteger[n],e,ind},e=f[[;;,2]];ind=位置[e,最小[e]][[-1,1]];f[[ind,1]]];数组[a,100,2](*阿米拉姆·埃尔达尔2023年1月7日*)
黄体脂酮素
(Python)
来自sympy导入因子
定义a(n):
最大系数=0
min_exponent=浮点(“inf”)
对于p,因子(n).items()中的指数:
如果指数<最小指数:
最大系数=p
min_exponent=指数
elif指数==最小指数:
最大系数=最大(最大系数,p)
返回最大因子
(Python)
来自sympy导入因子
定义A359612型(n) :return(f:=列表(map(元组,zip(*排序(factorint(n).items(),reverse=True))))[0][f[1].index(min(f[1]))]#柴华武2023年2月7日
(PARI)a(n)=my(f=因子(n),e=vecmin(f[,2]));f[vecmax(选择(x->(x==e),f[,2],1)),1]\\米歇尔·马库斯2023年1月26日
搜索在0.007秒内完成
|