|
Search: id:A067101
|
|
|
| A067101 |
|
Floor[ X/Y], where X = concatenation of the primes and Y = concatenation of natural numbers. |
|
+0
5
|
|
| 2, 1, 1, 1, 19, 190, 1909, 19092, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 190926, 1909260, 19092601, 190926018, 1909260182, 19092601827, 190926018273
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
a(5) = floor [235711/12345]=floor[19.093641150...] = 19.
|
|
MATHEMATICA
|
f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[Prime[k]]]; y = StringJoin[y, ToString[k]]; k++ ]; Return[ Floor[ ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 25} ]
|
|
CROSSREFS
|
Cf. A067091, A067092, A067093, A067094, A067095, A067096, A067097, A067098, A067099.
floor[A019518(n)/A007908(n)]
Adjacent sequences: A067098 A067099 A067100 this_sequence A067102 A067103 A067104
Sequence in context: A029582 A067095 A070888 this_sequence A105816 A062979 A114781
|
|
KEYWORD
|
easy,base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jan 07 2002
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 09 2002
|
|
|
Search completed in 0.002 seconds
|
