% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/chapter17_profit_analysis.R
\name{NPV_partial}
\alias{NPV_partial}
\title{Partial net present values}
\usage{
NPV_partial(Pi, r)
}
\arguments{
\item{Pi}{Numeric profit-signature vector.}

\item{r}{Annual effective risk discount rate. May be scalar or vector;
values must be greater than \code{-1}.}
}
\value{
A named numeric vector for scalar \code{r}, or a numeric matrix for
  vectorized \code{r}.
}
\description{
Computes cumulative discounted profits through each duration. A scalar
discount rate returns a named vector; vectorized rates return a matrix.
}
\examples{
Pi <- c(-15.00, 8.42, 8.39, 8.58)
NPV_partial(Pi, r = 0.10)

}
