%I#24 2015年3月25日01:56:26

%编号：3,3034738724131143054423115

%A191677中的项数小于或等于10^N。

%C 0.50801<lim A229299（n）/10^n=lim A229.298（n）/10^n<0.50966。

%C似乎A（n）/10^n的收敛速度很慢；与A229298（n）/10μn进行比较。

%H J.M.Grau，A.M.Oller-Marceén，<A href=“http://arxiv.org/abs/1304.2678“>关于同余sum_｛k=1｝^n k^f（n）==0（mod n）</a>，arXiv:1304.2678[math.NT]，2013。

%t fa=系数整数；Carlitz[k_，n_]：=Mod[n-Sum[If[IntegerQ[k/（fa[n][[i，1]]-1）]，n/fa[n][i，1]，0]，{i，1，长度[fa[n]}]，n]；超级跑车[k_，n_]：=如果[k==1||Mod[k，2]==0||Mod[n，4]>0，Carlitz[k，n]，Mod[Carlitz[k，n]-n/2，n]]；表[打印[长度@选择[范围[10^n]，超级跑车[#-1，#]==0&]]，{n，1，7}]

%Y参见A228919、A229298、A191677。

%K nonn，更多，难

%O 1,1号机组

%A _何塞·玛丽亚·格劳·里巴斯（JoséMaríA Grau Ribas），2013年9月20日