Kom igångKom igång gratis

Plotta P/B mot ROE

Nu när du har beräknat ROE och P/B-multiplar för medelstora bolag inom konsumentdiskretionärsektorn kan vi plotta P/B-multipeln (y-axel) mot ROE (x-axel). Sedan lägger vi till en trendlinje i diagrammet för att tydligt visa om det finns ett samband mellan de två variablerna. Data för roe och p_bv finns i datamängden cons_disc.

Den här övningen är en del av kursen

Aktievärdering i R

Visa kurs

Övningsinstruktioner

  • Ange x-axelns intervall så att hela spannet av ROE-värden täcks in, med hjälp av min() och max().
  • Ange y-axelns intervall så att hela spannet av P/B-värden täcks in, med hjälp av min() och max().
  • Plotta P/B mot ROE och märk x-axeln "Return on Equity" och y-axeln "Price-to-Book".
  • Lägg till en trendlinje med regressionsmodellen via abline().

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# 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")
Redigera och kör kod