%I#5 2019年10月8日16:26:44
%S 5,6,9,14,33,49,62,94177445817886913961114611516331719,
%电话1822200621732209230626252649282532553430345038714018,
%电话:4405441445757546388695294568760096162650668498110811381138126833485709741977010222106351121120141337713458137671399315351
%N数字N,A003415的零次或多次应用将导致5。
%C{5}与A099308中k项的并集,其中A327968(k)=5。
%H Antti Karttunen,n的表,n=1..10000的a(n)</a>
%o(PARI)
%o A003415检查(n)=如果(n<=1,0,my(f=系数(n),s=0);对于(i=1,#f~,如果(f[i,2]>=f[i、1],返回(0),s+=f[i,2]/f[i,1]));(n*s));
%o是A328115(n)={while(n>5),n=A003415 checked(n));(5==n);};
%o k=0;n=0;而(k<100,n++;如果(isA328115(n),k++;打印1(n,“,”));
%Y参见A003415、A099308、A327968、A37975、A328117。
%K nonn公司
%O 1,1号机组
%A _Antti Karttunen_,2019年10月7日
|