Netto contante waarde van investeringen
Joe, de eigenaar van Cynthia's lievelingsrestaurant, vraagt om advies. Hij wil een nieuwe pizzaoven kopen ter waarde van 10.000 EUR. Hij verwacht dat deze investering extra kasstromen zal opleveren, maar vraagt zich af of de nieuwe oven winstgevend is.
Je moet de netto contante waarde (NCW) van Joe's investering berekenen. Deze NCW is de som van de contante waardes van de toekomstige kasstromen (in blauw) die door de investering worden gegenereerd, min de initiële kost van 10.000 (in rood) op tijdstip 0.
Wat is je advies aan Joe? Ga ervan uit dat de rente constant is en gelijk aan 5%.
Deze oefening maakt deel uit van de cursus
Waardering van levensverzekeringsproducten in R
Oefeninstructies
- Maak
cash_flowsmet de positieve kasstromen van de investering. De vector begint met een nul. - Definieer
discount_factorsals 1 plus de rente van 5% tot de macht min een vector van 0 tot en met 5. - Bereken de
net_present_valuevan de investering als de contante waarde van de toekomstige opbrengsten min de initiële kost van 10.000. Realiseert Joe uiteindelijk winst of verlies?
Interactieve oefening met praktijkervaring
Probeer deze oefening door deze voorbeeldcode aan te vullen.
# Define the cash flows
cash_flows <- c(0, ___(___, ___), ___(___, ___))
# Define the discount factors
discount_factors <- (1 + ___) ^ - (___)
# Calculate the net present value
net_present_value <- ___(___ * ___) - ___
net_present_value