检验过的
经核准的
提出
编辑
求和{k=1..n}a(k)~c*n^2/2,其中c=A073010型/A086724号= 0.77383581325017004332... . -阿米拉姆·埃尔达尔2023年11月21日
囊性纤维变性。A000086号,A073010型,A086724号。
多重,非n,容易的
a[n_]:=如果[n==1,1,乘积[{p,e}=pe;其中[p==3,3^e,Mod[p,3]==2,(p^2)^商[e,2],真,(p-1)e+p)p^(e-1)],{pe,因子整数[n]}];
a/@范围[1100](*Jean-François Alcover公司2019年9月20日,PARI*)