Skip to contents

Cost Performance Index (CPI).

Usage

cpi(ev, ac)

Arguments

ev

Earned Value.

ac

Actual Cost.

Value

The function returns the Cost Performance Index (CPI) of work completed.

Examples

bac <- 100000
actual_per_complete <- 0.35
ev <- ev(bac, actual_per_complete)
actual_costs <- c(9000, 18000, 36000, 70000, 100000)
time_period <- 3
ac <- ac(actual_costs, time_period)

cpi <- cpi(ev, ac)
cat("Cost Performance Index (CPI):", cpi, "\n")
#> Cost Performance Index (CPI): 0.9722222