This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A067103 Floor[X/Y], where X = concatenation of cubes and Y = concatenation of natural numbers. 3
 1, 1, 14, 148, 14804, 1480398, 148039049, 14803895356, 1480389427723, 148038942652481, 14803894265116205, 1480389426511476635, 148038942651147507639, 14803894265114750596056 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,3 COMMENTS a(n) -> 148038942651147505942387547594667814093751032610233441970375... LINKS EXAMPLE a(6) = floor [182764125216/123456]= floor[1480398.888802...]=1480398. MATHEMATICA f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[k^3]]; y = StringJoin[y, ToString[k]]; k++ ]; Return[ Floor[ ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 20} ] nn=20; With[{c=Table[IntegerDigits[n^3], {n, nn}], s=Table[IntegerDigits[n], {n, nn}]}, Table[Floor[FromDigits[Flatten[Take[c, i]]]/FromDigits[Flatten[Take[s, i]]]], {i, nn}]] (* Harvey P. Dale, Feb 10 2013 *) CROSSREFS Cf. A067091, A067092, A067093, A067094, A067095, A067096, A067097, A067098, A067099, A067100, A067101, A067102. See also A066700. Sequence in context: A081201 A065899 A162965 * A081184 A032343 A222614 Adjacent sequences:  A067100 A067101 A067102 * A067104 A067105 A067106 KEYWORD nonn,base AUTHOR Robert G. Wilson v, Jan 09 2002 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 21 08:47 EDT 2019. Contains 328292 sequences. (Running on oeis4.)