fit_sigmoidal {PRA} | R Documentation |
Fit a Sigmoidal Model.
Description
Fit a Sigmoidal Model.
Usage
fit_sigmoidal(data, x_col, y_col, model_type)
Arguments
data |
A data frame containing the time (x_col) and completion (y_col) vectors. |
x_col |
The name of the time vector. |
y_col |
The name of the completion vector. |
model_type |
The name of the sigmoidal model (Pearl, Gompertz, or Logistic). |
Value
The function returns a list of results for the sigmoidal model.
Examples
data <- data.frame(time = 1:10, completion = c(5, 15, 40, 60, 70, 75, 80, 85, 90, 95))
fit <- fit_sigmoidal(data, "time", "completion", "logistic")
predictions <- predict_sigmoidal(fit, seq(min(data$time), max(data$time),
length.out = 100), "logistic")
p <- ggplot2::ggplot(data, ggplot2::aes_string(x = "time", y = "completion")) +
ggplot2::geom_point() +
ggplot2::geom_line(data = predictions, ggplot2::aes(x = x, y = pred), color = "red") +
ggplot2::labs(title = "Fitted Logistic Model", x = "time", y = "completion %") +
ggplot2::theme_minimal()
p
[Package PRA version 0.2.0 Index]