|
|
A067093
|
|
Floor[X/Y] where X = concatenation of (n+1)-st odd number through the 2n-th odd number and Y = concatenation of first n odd numbers.
|
|
10
|
|
|
3, 4, 58, 6714, 81975, 96852, 111729, 126607, 141484, 156361, 171238, 186116, 200993, 215870, 230748, 245625, 260502, 275379, 290257, 305134, 320011, 334889, 349766, 364643, 379520, 39439811, 4092753962, 424152673322, 43902995043838
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(4) = floor[9111315/1357] = floor[6714.30729550478997789240972733972] = 6714.
|
|
MATHEMATICA
|
f[n_] := (k = 1; x = y = "0"; While[k < n + 1, x = StringJoin[x, ToString[2n + 2k -1]]; y = StringJoin[y, ToString[2k - 1]]; k++ ]; Return[ Floor[ ToExpression[x] / ToExpression[y]]] ); Table[ f[n], {n, 1, 32} ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|