%I#12 2022年7月9日11:09:23
%S 1,2,2,2,2,4,2,2,4,2,5,2,4,2,4,2,4,2,4,5,4,2,5,2,4,2,4,5,2,4,2,4,2,5,2,8,2,2,4,4,4,4,
%温度4,5,2,4,4,6,2,8,2,5,5,4,2,5,1,5,2,4,4,1,4,4,6,4,3,4,8,2,5,
%U 4,8,2,5,2,4,4,5,4,4,1,2,6,2,4,11,4,4_6,2,10,4,6,4,3,5,5,2,8,2
%N不大于N的无平方核的N的除数。
%H Reinhard Zumkeller,n的表,n=1..10000的a(n)</a>
%F a(n)>=A034444(n)。
%F a(n)=A095960(n)+1.-_Reinhard Zumkeller,2013年9月10日
%e 56=7*2^3的无平方核是14=7*2,56的除数<=14是{1,2,4,7,8,14},因此a(56)=6。
%t a[n_]:=除数和[n,1&,#<=倍@@FactorInteger[n][[;;,1]]&];阵列[a,100](*_Amiram Eldar_,2022年7月9日*)
%o(哈斯克尔)
%o a073180 n=长度[x|x<-a027750_行n,x<=a007947 n]
%o--_Reinhard Zumkeller,2013年9月10日
%Y参考A000005、A007947、A034444、A073181、A073182、A095960。
%K nonn公司
%O 1,2号机组
%A _Reinhard Zumkeller_,2002年7月19日
|