Wykres P/B vs. ROE
Teraz, gdy obliczyłeś wskaźniki ROE i P/B dla spółek o średniej kapitalizacji z sektora dóbr uznaniowych, możemy przedstawić wskaźnik P/B (oś y) w zależności od ROE (oś x) na wykresie. Następnie dodamy linię trendu, aby wizualnie pokazać zależność między tymi dwiema zmiennymi – o ile taka istnieje. Dane dotyczące roe i p_bv znajdują się w zbiorze danych cons_disc.
To ćwiczenie jest częścią kursu
Wycena akcji w R
Instrukcje do ćwiczenia
- Ustaw zakres osi x tak, aby obejmował wszystkie wartości ROE – użyj funkcji
min()imax(). - Ustaw zakres osi y tak, aby obejmował wszystkie wartości P/B – użyj funkcji
min()imax(). - Narysuj wykres P/B vs. ROE, oznaczając oś x etykietą "Return on Equity", a oś y etykietą "Price-to-Book".
- Dodaj linię trendu na podstawie modelu regresji, korzystając z funkcji
abline().
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
# 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")