P/B ve ROE'yi görselleştir
Artık orta ölçekli Tüketici İhtiyari firmaları için ROE ve P/B çarpanlarını hesapladığına göre, P/B çarpanını (y ekseni) ROE'ye (x ekseni) karşı çizebiliriz. Ardından, iki değişken arasındaki eğilimi görsel olarak göstermek için grafiğe bir trend çizgisi ekleyeceğiz. roe ve p_bv verileri cons_disc veri kümesinde bulunuyor.
Bu egzersiz, kursun bir parçasıdır
R ile Hisse Değerleme
Egzersiz talimatları
- ROE değerlerinin tüm aralığını kapsadığından emin olmak için x ekseni aralığını
min()vemax()ile ayarla. - P/B değerlerinin tüm aralığını kapsadığından emin olmak için y ekseni aralığını
min()vemax()ile ayarla. - P/B ile ROE verisini çiz ve x eksenini "Return on Equity", y eksenini "Price-to-Book" olarak etiketle.
abline()kullanarak regresyon modelinden bir trend çizgisi ekle.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
# 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")