|
|
A192675
|
|
Floor-Sqrt transform of large Fine numbers (A000957).
|
|
0
|
|
|
1, 0, 1, 1, 2, 4, 7, 13, 24, 46, 85, 160, 301, 570, 1083, 2064, 3943, 7553, 14501, 27901, 53784, 103859, 200867, 389044, 754502, 1465037, 2847895, 5541797, 10794360, 21044286, 41061688, 80182834, 156692019, 306417804, 599604941, 1174044166, 2300154199, 4508885393, 8843184248
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,5
|
|
LINKS
|
Table of n, a(n) for n=0..38.
|
|
FORMULA
|
a(n) = floor(sqrt(Fine(n))).
|
|
MATHEMATICA
|
FSFromSeries[f_, x_, n_] := Map[Floor[Sqrt[#]]&, CoefficientList[Series[f, {x, 0, n}], x]]
FSFromSeries[(1+2x-Sqrt[1-4x])/(2x(2+x)), x, 100]
|
|
CROSSREFS
|
Sequence in context: A192654 A260668 A018184 * A018185 A191526 A005255
Adjacent sequences: A192672 A192673 A192674 * A192676 A192677 A192678
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Emanuele Munarini, Jul 07 2011
|
|
STATUS
|
approved
|
|
|
|