PV_A = 22487 ## one cycle present values PV_B = 37582 PVs = c(PV_A, PV_B) ns = c(4, 6) r = 0.1 numer = r * (1 + r)^ns * PVs denom = (1 + r)^ns - 1 print( numer/denom )