_阿玛纳斯·穆尔西 (阿玛纳斯_阴暗的(在)雅虎.通用域名格式), _, 2002年11月22日
OEIS服务器: https://oeis.org/edit/global/2075
编辑和扩展人_克劳斯·布罗克豪斯 (克劳斯-布罗克豪斯(在)t吨-联机.判定元件), _, 2002年12月6日
OEIS服务器: https://oeis.org/edit/global/145
(PARI){对于(n=1,31,k=楼层(log(n)/log(10))+1; d=除数(n); v=Str(); 对于(i=1,matsize(d)[2],v=concat(v,Str(d[i])); s=评估(v); t=s+1; m=地板(对数/对数(10))+1; d=k-m; s=s*10^d; t=t*10^d;b=1; 而(b>0,q=楼层(s/n); 当(b>0&&(p=q*n)<t时,如果(p>=s,打印1(p,“,”); b=0、q++); s=10*s; t=10*t)}
基础,非n,新的
以n的除数串联开始的n的最小倍数(按递增顺序)。
1, 12, 132, 124, 15, 1236, 175, 1248, 1395, 12510, 1111, 12346128, 1131, 127148, 13515, 124816, 1173, 12369186, 1197, 12451020, 137214, 12112210, 12305, 1234681224, 1525, 1213264, 1392714, 1247142820, 12905, 12356101530, 13113
1,2
7的除数的级联是17;175=25*7是以17开头的7的最小倍数,因此a(7)=175。
(PARI){对于(n=1,31,k=楼层(log(n)/log(10))+1;d=除数(n);v=Str(b>0&&(p=q*n)<t,如果(p>=s,打印1(p,“,”);b=0,q++);s=10*s;t=10*t))}
囊性纤维变性。A078810美元.
基础,非n
阿玛纳斯·穆尔西(Amarnath_Murthy(AT)yahoo.com),2002年11月22日
由克劳斯·布罗克豪斯(Klaus-Brockhaus(AT)t-online.de)编辑和扩展,2002年12月6日
经核准的