Desconto dos fluxos de caixa do título com um yield conhecido
Depois de listar os fluxos de caixa do título, podemos seguir os passos para calcular o valor presente de cada fluxo e avaliar o título. Lembre-se de que o valor do título é a soma do valor presente de seus fluxos de caixa.
Neste exercício, você vai calcular o fator de valor presente adequado, pv_factor, para cada fluxo de caixa, para então calcular o valor presente pv de cada um. Em seguida, você somará os pv para encontrar o valor do título.
Lembre-se de que este título tem um yield de 6%, que funciona como a taxa de desconto. O data frame que você criou no exercício anterior, cf, está disponível no seu ambiente de trabalho.
Este exercício faz parte do curso
Avaliação e Análise de Títulos em R
Instruções do exercício
- Crie uma nova coluna,
t, no seu data framecfpara indicar o ano em que o fluxo de caixa é recebido. Observe que, para o seu objetivo, o ano é equivalente ao nome das linhas no seu data frame (1,2,3, etc.). Isso significa que você pode simplesmente usarrownames()para definirt. Useas.numeric()para garantir que os valores detsejam numéricos. - Crie outra nova coluna,
pv_factor, no objetocfpara armazenar o fator de valor presente de cada ano. Lembre-se de que o fator de valor presente de cada ano é calculado como 1 dividido por 1 + a taxa de yield (neste caso 6%, ou0.06) elevado à potência da sua variável de tempo (t). - Crie uma coluna
pvemcfpara armazenar o valor presente do fluxo de caixa de cada ano. O valor presente é calculado como o fluxo de caixa (cf) multiplicado pelo fator de valor presente do ano (pv_factor). - Por fim, use
sum()para somar os valores empve encontrar o valor do título.
Exercício interativo prático
Experimente este exercício completando este código de exemplo.
# Add column t to cf
cf$t <- as.numeric(___(___))
# Calculate pv_factor
cf$pv_factor <- 1 / (1 + ___)^___
# Calculate pv
cf$pv <- ___ * ___
# Calculate the bond price
sum(___$___)