Nuvärde av investeringar
Joe, ägaren till Cynthias favoritrestaurang, ber om råd. Han vill köpa en ny pizzaugn som kostar 10 000 EUR. Han räknar med att investeringen kommer att generera ytterligare kassaflöden, men undrar om den nya ugnen verkligen är lönsam.
Din uppgift är att beräkna nuvärdet (NPV) av Joes investering. NPV är summan av nuvärdet av de framtida kassaflödena (i blått) som investeringen genererar, minus den initiala kostnaden på 10 000 (i rött) vid tidpunkt 0.
Vad är ditt råd till Joe? Anta att räntorna är konstanta och uppgår till 5 %.
Den här övningen är en del av kursen
Värdering av livförsäkringsprodukter i R
Övningsinstruktioner
- Skapa
cash_flowsmed de positiva kassaflödena kopplade till investeringen. Vektorn börjar med en nolla. - Definiera
discount_factorssom 1 plus räntan på 5 % upphöjt till minus en vektor från 0 till 5. - Beräkna
net_present_valueför investeringen som nuvärdet av de framtida vinsterna minus den initiala kostnaden på 10 000. Kommer Joe att gå med vinst eller förlust totalt sett?
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# 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