%I#10 2022年7月7日02:07:43

%S 1,3,6,37,75668107537732742767181186531400838937770108268896，

%电话282951249633932500127558475760455590365

%N对k进行编号，使前k个无平方数的算术平均值为整数。

%C数k，使得A173143（k）可被k整除。

%C对应的商A173143（k）/k为1，2，4，29。。。，A005117（k）的对应值为1、3、7、59。。。（有关更多值，请参阅链接）。

%H Amiram Eldar，n，a（n），A173143（a（n。

%e3是一个项，因为前3个无平方数（1+2+3）/3=2的算术平均值是一个整数。

%t s=选择[Range[10^6]，SquareFreeQ]；r=累计[s]/范围[长度[s]]；ind=位置[r，_？整数Q]//压扁

%o（PARI）小于等于（n）=我的（s=0，k=0）；forsquarefree（m=1，n，s+=m[1]；k+=1；如果（s%k==0，print1（k，“，”））；\\_Daniel Suteu_，2022年7月6日

%Y参考A005117，A173143。

%Y相似序列：A045345、A050226、A056550、A064605、A064066、A064670、A064610、A064 611、A064612、A048290。

%K nonn，更多

%O 1、2

%A _Amiram Eldar，2022年7月6日

%E a（17），来自Daniel Suteu，2022年7月6日