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
R ile Hisse Değerleme
kursunun bir parçasıdırEgzersiz 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ı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
# 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")