Anleihebewertung
In Kapitel 1 hast du eine Anleihe Schritt für Schritt bewertet. In dieser Übung bewertest du eine Anleihe mit einem Nennwert von 100 $, einer Kuponrate von 3 % und einer Restlaufzeit von 8 Jahren. Du stellst die Cashflows der Anleihe dar und berechnest den Barwert jedes einzelnen Cashflows mithilfe der Aaa-Rendite, die du in der vorherigen Übung ermittelt hast.
Das Objekt aaa_yield ist mit dem Wert 0.0341 in deinem Workspace vorgeladen.
Diese Übung ist Teil des Kurses
Anleihebewertung und -analyse in R
Anleitung zur Übung
- Erstelle ein Cashflow-Objekt (
cf) mit den Cashflows der Anleihe. - Verwende
data.frame(), umcfin ein Data-Frame umzuwandeln, damit du weitere für deine Analyse benötigte Variablen hinzufügen kannst. - Füge einen Zeitindikator (
cf$t) hinzu, der die Jahre 1 bis 8 mit dem Befehlseq()abbildet. - Berechne den PV-Faktor (
cf$pv_factor) auf Basis der Moody’s-Aaa-Rendite (aaa_yield) und deines Zeitindikators (cf$t). - Berechne den Barwert jedes Cashflows (
cf$pv) als Produkt auscf$cfund dem PV-Faktor (cf$pv_factor). - Berechne abschließend den Preis der Anleihe als
sum()der Barwerte der einzelnen Cashflows.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
# Layout the bond's cash flows
cf <- c(___, ___, ___, ___, ___, ___, ___, ___)
# Convert to data.frame
cf <-
# Add time indicator
cf$t <- seq(___, ___, ___)
# Calculate PV factor
cf$pv_factor <- 1 / (1 + ___)^___
# Calculate PV
cf$pv <-
# Price bond
sum(___)