%I#12 2020年11月8日03:00:20
%S 1,1,1,1,3,1,1,5,1,4,1,7,5,1,1,9,1,5,7,11,1,8,13,1,7,15,1,1,
%电话:11,17,7,9,1,19,13,8,1,21,11,9,23,16,1,25,17,13,1,27,11,8,19,29,1,
%U 20,1,31,9,1,13,33,1,17,23,35,1,9,1,37,25,19,11,39,1,16,1,41,1,28,17,43
%N a(N)=N/A034684(N)。
%C当n>1时,n的最大等分幺正因子_Amiram Eldar,2020年11月8日
%H Antti Karttunen,n的表,n=1..65537的a(n)</a>
%e由于A034684(6)=2,此处a(6)的值为6/2=3。
%t a[n_]:=n/Min@(幂@@@FactorInteger[n]);阵列[a,100](*_Amiram Eldar_,2020年11月8日*)
%o(PARI)A052125(n)={局部(f,m);如果(n==1,1,f=系数(n);m=f[1,1]^f[1,2];对于(i=1,矩阵大小(f)[1],m=min(m,f[i,1]^f[i、2]));n/m)};\\_Michael B.Porter,2010年1月28日
%Y参考A034684。
%K nonn公司
%O 1,6型
%A _James A.Sellers_,2000年1月21日
|