A078396 - OEIS

%I #4 Dec 05 2013 19:55:58

%S 21,153,1345,1257,1204544,11698111,114516123,1126760562,11124999996,

%T 1011123595468,109012001333443,10833955895979437,1076982819760661072,

%U 107148014373065628394,10667115902902368632876

%N a(n) = A078395(n+1)/A078395(n).

%o (PARI) {a=1; for(n=2,16,k=floor(log(a)/log(10))+1; v=Str(1); for(i=2,n, v=concat(Str(i),v)); s=eval(v); t=s+1; m=floor(log(s)/log(10))+1; d=k-m; s=s*10^d; t=t*10^d; b=1; j=d; while(b>0,q=floor(s/a); while(b>0&&(p=q*a)<t,if(p>=s,print1(q,","); b=0,q++)); s=10*s; t=10*t); a=p)}

%Y Cf. A078296, A078395, A078397.

%K base,nonn

%O 1,1

%A _Amarnath Murthy_, Nov 26 2002

%E Edited and extended by _Klaus Brockhaus_, Dec 06 2002