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.
%I A067098 #5 Mar 10 2019 12:44:54 %S A067098 3,3,31,318,31817,3181548,3181530396,3181528335091,31815281031585777, %T A067098 31815281005815399552,318152810055319253966698, %U A067098 3181528100552883295133046294,318152810055287994498392866979206 %N A067098 Floor[X/Y] where X = concatenation in increasing order of first n powers of 3 and Y = that of first n natural numbers. %e A067098 a(4)= floor [ 392781/1234] = floor[318.299027552674230145867098865478] = 318. %t A067098 f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[3^k]]; y = StringJoin[y, ToString[k]]; k++ ]; Return[ Floor[ ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 15} ] %t A067098 Table[Floor[FromDigits[Flatten[IntegerDigits/@(3^Range[n])]]/ FromDigits[ Flatten[IntegerDigits/@Range[n]]]],{n,15}] (* _Harvey P. Dale_, Mar 10 2019 *) %Y A067098 Cf. A067088, A067089, A067090, A067091, A067092, A067093, A067094, A067095, A067096, A067097. %K A067098 easy,base,nonn %O A067098 1,1 %A A067098 _Amarnath Murthy_, Jan 07 2002 %E A067098 More terms from _Robert G. Wilson v_, Jan 09 2002