P/B gegen ROE plotten
Nachdem du die ROE- und P/B-Multiplikatoren für die Midcap-Unternehmen im Bereich Consumer Discretionary berechnet hast, können wir nun den P/B-Multiplikator (y-Achse) gegen den ROE (x-Achse) plotten. Anschließend fügen wir dem Plot eine Trendlinie hinzu, um einen möglichen Zusammenhang zwischen den beiden Variablen visuell darzustellen. Die Daten für roe und p_bv befinden sich im Datensatz cons_disc.
Diese Übung ist Teil des Kurses
Aktienbewertung in R
Anleitung zur Übung
- Setze den Bereich der x-Achse so, dass der gesamte Bereich der ROE-Werte mit
min()undmax()abgedeckt ist. - Setze den Bereich der y-Achse so, dass der gesamte Bereich der P/B-Werte mit
min()undmax()abgedeckt ist. - Plotte die P/B- gegen ROE-Daten und beschrifte die x-Achse mit "Return on Equity" und die y-Achse mit "Price-to-Book".
- Füge mit dem Regressionsmodell eine Trendlinie mit
abline()hinzu.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
# Set x-axis range
x.range <- c(___(cons_disc$roe),
___(cons_disc$roe))
# Set y-axis range
y.range <- c(___(cons_disc$p_bv),
___(cons_disc$p_bv))
# Plot data
plot(y = ___,
x = ___,
xlab = "___",
ylab = "___",
xlim = x.range,
ylim = y.range,
col = "blue",
main = "Price-to-Book Value and Return on Equity
Of Mid-Cap Consumer Discretionary Firms")
# Regress roe on p_bv
reg <- lm(p_bv ~ roe, data = cons_disc)
# Add trend line in red
___(___, col = "red")