Argomenti multipli (2)
Pensiamo a un esempio più complicato. Ti ricordi il concetto di valore attuale dal corso Introduction to R for Finance? In caso contrario, puoi rivedere il video qui. L’idea è che vuoi scontare una somma che riceverai in futuro a un certo tasso d’interesse, per rappresentarne il valore in termini di denaro di oggi. È stata sviluppata la seguente formula generale per aiutare in questo:
present_value <- cash_flow * (1 + i / 100) ^ -year
Non sarebbe comodo avere una funzione che facesse questo calcolo per te? Magari qualcosa del tipo:
present_value <- pv(cash_flow, i, year)
Questa funzione dovrebbe funzionare se passi numeri come pv(1500, 5, 2) e dovrebbe funzionare anche se passi vettori della stessa lunghezza per calcolare in una volta un intero vettore di valori attuali!
La funzione percent_to_decimal() è a tua disposizione.
Questo esercizio fa parte del corso
R intermedio per la finanza
Istruzioni dell'esercizio
- Completa gli spazi vuoti nella funzione in modo che faccia quanto segue:
- Richiedi gli argomenti:
cash_flow,i,year - Crea il moltiplicatore di sconto:
(1 + i / 100). Usa la funzionepercent_to_decimal()per convertireiin decimale. - Esegui il calcolo del valore attuale. Non salvarlo in una variabile. Essendo l’ultima riga eseguita, verrà restituito automaticamente.
- Richiedi gli argomenti:
- Calcola il valore attuale di $1200, con un tasso d’interesse del 7%, da ricevere tra 3 anni.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
# Present value function
pv <- function(___, ___, ___) {
# Discount multiplier
mult <- 1 + ___(i)
# Present value calculation
___ * ___ ^ -___
}
# Calculate a present value
___