%I#19 2019年1月20日10:14:06
%S 1,1,2,1,3,57,2,3,61013,24083,50,1,26519,2262125,61,431002,
%电话:4194281,2,234070,9,36268435427,511073741793,899165502,29,8,
%电话:687194766992621064057,411099511627735,224398046511061980,5419425870368744177617
%N最小的k,使得S(N)=d(N+k),其中S(N)是Kempner函数(A002034),d(N)是N(A000005)的除数。
%H Amiram Eldar,n的表格,a(n)表示n=2..100</a>
%t kemp[n_]:=模块[{m=1},而[!IntegerQ[m!/n],m++];m] ;a[n_]:=模块[{k=1,s=kemp[n]},而[DivisorSigma[0,n+k]!=s、 k++];k] ;阵列[a,20,2](*_Amiram Eldar_,2019年1月20日*)
%Y参考A000005、A002034、A073307、A073413、A073535。
%K nonn公司
%氧2,3
%A _Jason Earls,2002年8月22日
%E更多条款,来自Sean A.Irvine_,2011年2月20日
%E a(37)-a(47),来自阿米拉姆·埃尔达尔,2019年1月20日
|