ComeçarComece de graça

Múltiplos argumentos (2)

Vamos pensar em um exemplo mais complicado. Você se lembra de valor presente do curso Introduction to R for Finance? Se não, você pode rever o vídeo aqui. A ideia é que você quer descontar um valor que receberá no futuro a uma taxa de juros específica para representar o valor desse dinheiro em reais de hoje. A seguinte fórmula geral foi desenvolvida para ajudar com isso:

present_value <- cash_flow * (1 + i / 100) ^ -year

Não seria ótimo ter uma função que fizesse esse cálculo por você? Algo do tipo:

present_value <- pv(cash_flow, i, year)

Essa função deve funcionar se você passar números como pv(1500, 5, 2) e também se você passar vetores de mesmo comprimento para calcular todo um vetor de valor presente de uma vez!

A função percent_to_decimal() está disponível para você usar.

Este exercício faz parte do curso

R Intermediário para Finanças

Ver curso

Instruções do exercício

  • Preencha os espaços em branco na função para que ela faça o seguinte:
    • Exigir os argumentos: cash_flow, i, year
    • Criar o multiplicador de desconto: (1 + i / 100). Use a função percent_to_decimal() para converter i em decimal.
    • Executar o cálculo do valor presente. Não armazene isso em uma variável. Como a última linha executada, ele será retornado automaticamente.
  • Calcule o valor presente de $1200, a uma taxa de juros de 7%, a ser recebido daqui a 3 anos.

Exercício interativo prático

Experimente este exercício completando este código de exemplo.

# Present value function
pv <- function(___, ___, ___) {
    
    # Discount multiplier
    mult <- 1 + ___(i)
    
    # Present value calculation
    ___ * ___ ^ -___
}

# Calculate a present value
___
Editar e executar o código