cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A067116 Floor(decimal concatenation of first n natural numbers/their sum).

This page as a plain text file.
%I A067116 #11 Jul 22 2022 13:20:06
%S A067116 1,4,20,123,823,5878,44091,342935,2743484,224466889,18705574106,
%T A067116 1582779347450,135666801210013,11757789438201155,1028806575842601095,
%U A067116 90777050809641273099,8069071183079224275500,721969526907088487807963
%N A067116 Floor(decimal concatenation of first n natural numbers/their sum).
%H A067116 Harry J. Smith, <a href="/A067116/b067116.txt">Table of n, a(n) for n = 1..100</a>
%e A067116 a(6) = floor (123456 / 21) = 5878.
%t A067116 Table[Floor[FromDigits[Flatten[IntegerDigits/@Range[n]]]/Total[Range[n]]],{n,20}] (* _Harvey P. Dale_, Jul 22 2022 *)
%o A067116 (PARI) digitsIn(x)= { local(d); if (x==0, return(1)); d=1 + log(x)\log(10); if (10^d == x, d++, if (10^(d-1) > x, d--)); return(d) } Concat(a, b)= { return(a*10^digitsIn(b) + b) } { c=0; s=0; for (n=1, 100, c=Concat(c, n); s+=n; write("b067116.txt", n, " ", floor(c/s)) ) } \\ _Harry J. Smith_, May 24 2010
%K A067116 easy,nonn,base
%O A067116 1,2
%A A067116 _Amarnath Murthy_, Jan 08 2002
%E A067116 More terms from several contributors
%E A067116 Edited by _Charles R Greathouse IV_, Apr 26 2010