curv_index_fry {YEAB} | R Documentation |
Curvature index using Fry derivation
Description
Curvature index using Fry derivation
Usage
curv_index_fry(cr, time_in, fi_val, n = 4)
Arguments
cr |
A numeric vector of cumulative response |
time_in |
numeric, time (or the x axis in a cumulative response plot) |
fi_val |
the FI value |
n |
numeric, the number of subintervals |
Value
The curvature index as exposed by Fry
Examples
data("r_times")
r_times <- r_times[r_times < 60]
cr <- seq_along(r_times)
plot(r_times, cr, type = "s", xlim = c(min(r_times), max(r_times)))
segments(
x0 = min(r_times), y0 = min(cr),
x1 = max(r_times), y1 = max(cr)
)
segments(
x0 = min(r_times) + (max(r_times) - min(r_times)) / 2, y0 = min(cr),
x1 = max(r_times), y1 = max(cr),
col = "red"
)
curv_index_fry(cr, r_times, 60, 4)
[Package YEAB version 1.0.6 Index]