|
| |
|
|
A067089
|
|
Floor[X/Y] where X = concatenation of (2n), (2n-1), ... down to n+1 and Y = concatenation of n, n-1, n-2, ... down to 1.
|
|
9
| |
|
|
2, 2, 2, 2, 2, 185, 18461, 1842626, 183987603, 1837682236, 1999303871, 2000827643, 2000777468, 2000722020, 2000673854, 2000631711, 2000594530, 2000561482, 2000531914, 2000505305, 2000481231, 2000459347, 2000439367
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
EXAMPLE
| a(6)= floor [ 121110987/654321] = [185.094146451053840546153951959359]=185.
|
|
|
MATHEMATICA
| f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[2n - k + 1]]; y = StringJoin[ToString[2k - 1], y]; k++ ]; Return[ Floor[10* ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 25} ]
|
|
|
CROSSREFS
| Cf. A067088.
Sequence in context: A029665 A056993 A057331 * A090872 A194330 A194286
Adjacent sequences: A067086 A067087 A067088 * A067090 A067091 A067092
|
|
|
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
|
| |
|
|