%I #5 Jan 10 2022 11:10:12
%S 1,2,3,4,5,6,7,8,9,10,12,14,15,16,18,20,21,22,24,25,27,28,30,32,33,35,
%T 36,40,42,44,45,48,49,50,52,54,55,56,60,63,64,65,66,70,72,75,77,78,80,
%U 81,84,88,90,91,96,98,99,100,104,105,108,110,112,117,120
%N Numbers that appear in A349194.
%o (PARI) is(n)=if(n<11,return(n>0)); my(v=apply(k->[k,k],select(k->n%k==0,[2..10]))); while(#v, my(u=List()); for(i=1,#v, my(sd=v[i][1],a=v[i][2]); for(k=0,9, my(nsd=sd+k,t=nsd*a); if(n%t==0, if(n==t, return(1)); listput(u,[nsd,t])))); v=Set(u)); 0
%Y Cf. A349194, A349899.
%K base,nonn
%O 1,2
%A _Charles R Greathouse IV_, Dec 04 2021
|