% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/chapter16_universal_life.R
\name{i_credit_eiul}
\alias{i_credit_eiul}
\title{Credited rates from raw index growth rates}
\usage{
i_credit_eiul(
  i_raw,
  part = 1,
  floor = 0,
  cap = Inf,
  margin = 0,
  margin_after_participation = TRUE
)
}
\arguments{
\item{i_raw}{Numeric vector of raw index growth rates.}

\item{part}{Participation rate.}

\item{floor}{Minimum credited rate.}

\item{cap}{Maximum credited rate.}

\item{margin}{Index margin. Defaults to 0.}

\item{margin_after_participation}{Logical; if \code{TRUE}, subtract the
margin after applying the participation rate.}
}
\value{
Numeric vector of credited rates.
}
\description{
Applies participation, floor, cap, and optional margin to raw index growth
rates for an indexed universal life contract.
}
\examples{
raw <- iP_eiul(c(1000, 1050, 1200, 1100))
i_credit_eiul(raw, part = 1.10, floor = 0.01, cap = 0.10)

}
