% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/rga.R
\name{predict_rga}
\alias{predict_rga}
\title{Forecast Cumulative Failures from a Reliability Growth Model}
\usage{
predict_rga(object, times, conf_level = 0.95)
}
\arguments{
\item{object}{An object of class \code{rga} returned by \code{rga()}.}

\item{times}{A numeric vector of cumulative times at which to forecast.
All values must be finite and > 0. A warning is issued if any value is
at or below the maximum observed cumulative time (hindcasting).}

\item{conf_level}{The desired confidence level (default \code{0.95}). Must
be a single finite numeric in (0, 1).}
}
\value{
An object of class \code{rga_predict} containing:
\item{times}{The forecast cumulative times.}
\item{cum_failures}{Predicted cumulative failures.}
\item{lower_bounds}{Lower confidence bounds.}
\item{upper_bounds}{Upper confidence bounds.}
\item{conf_level}{The confidence level used.}
\item{model_type}{Either \code{"Crow-AMSAA"} or \code{"Piecewise NHPP"}.}
\item{rga_object}{The original \code{rga} object (used by the plot method).}
}
\description{
Takes a fitted \code{rga} object and a vector of cumulative times, returning
predicted cumulative failures with confidence bounds as an \code{rga_predict}
S3 object.
}
\examples{
times <- c(100, 200, 300, 400, 500)
failures <- c(1, 2, 1, 3, 2)
fit <- rga(times, failures)
fc <- predict_rga(fit, times = c(1500, 2000))
print(fc)
}
\seealso{
Other Reliability Growth Analysis: 
\code{\link{overlay_rga}()},
\code{\link{plot.rga}()},
\code{\link{plot.rga_predict}()},
\code{\link{print.rga}()},
\code{\link{print.rga_predict}()},
\code{\link{rga}()}
}
\concept{Reliability Growth Analysis}
