##
# Example usage
# Initial Investment = 100 currency units
# Expected to bring 120 currency units the next period
# The cost of capital is 10%
example <- idm(
CFS = c(-100,120),
COST = c(0,0.1)
)
print(example)
Run the code above in your browser using DataLab