%I#47 2022年9月13日04:06:42
%S 2,3,2,5,2,7,2,3,2,11,2,13,2,3,17,3,19,2,32,2,23,2,2,5,3,2,29,2,31,2,
%T 3,2,5,2,37,2,3,2,41,2,43,2,3,2,47,2,7,5,3,2,53,3,5,2,3,2,59,2,61,2,3,
%U 2,5,2,67,2,3,2,71,2,73,2,5,2,7,2,79,2,32,2,83,2,2,3,2,89
%N的最常见素因子中最小的。
%C选择n的素数因子,其指数最大。a(n)是这些素因子中最小的一个。
%C如果n的素因式分解有唯一的最大指数(A356862),则a(n)=A356840(n)。否则,a(n)是最常见的素因子中最小的,而A356840(n)则是其中最大的。
%如果最小素因子不是最常见的,则C a(n)与A020639(n)不同。例如:a(90)=3,因为90=2*3^2*5和3具有最大的指数。这与A020639(90)=2不同,因为2是最小的素因子。
%H Jens Ahlström,<a href=“/A356838/b356838.txt”>n的表,a(n)表示n=2.9999</a>
%ea(18)=3,因为18=2*3^2和3是最常见的素因子。
%e a(450)=3,因为450=2*3^2*5^2和3是最常见的素因子中最小的。
%t a[n_]:=模块[{f=FactorInteger[n],p,e},p=f[[;;,1]];e=f[[;;,2]];p[[第一位置[e,最大[e]][[1]]]];阵列[a,100,2](*_Amiram Eldar_,2022年9月1日*)
%o(Python)
%o来自sympy进口保理商
%o从集合导入计数器
%o定义a(n):
%o返回计数器(因子(n)).most_common(1)[0][0]
%o(Python)
%o来自sympy进口保理商
%o定义A356838(n):返回最大值(阶乘(n).items(),键=λx:(x[1],-x[0]))[0]#_Chai Wah Wu_,2022年9月10日
%o(PARI)a(n)=我的(f=系数(n),m=vecmax(f[,2]),w=选择(x->(f[x,2]==m),[1..#f~]));vecmin(向量(#w,k,f[w[k],1]);\\_米歇尔·马库斯,2022年9月1日
%Y参考A051903、A356840、A020639、A356862。
%K nonn,简单
%氧2,1
%2022年8月31日,A_Jens Ahlström_