Grafico P/B vs. ROE
Ora che hai calcolato i multipli ROE e P/B per le aziende midcap Consumer Discretionary, possiamo tracciare il multiplo P/B (asse y) rispetto all’ROE (asse x). Poi aggiungiamo una linea di tendenza al grafico per mostrare visivamente l’eventuale relazione tra le due variabili. I dati per roe e p_bv sono nel dataset cons_disc.
Questo esercizio fa parte del corso
Valutazione azionaria in R
Istruzioni dell'esercizio
- Imposta l’intervallo dell’asse x per coprire l’intera gamma dei valori di ROE usando
min()emax(). - Imposta l’intervallo dell’asse y per coprire l’intera gamma dei valori di P/B usando
min()emax(). - Traccia i dati P/B vs. ROE e indica l’asse x come "Return on Equity" e l’asse y come "Price-to-Book".
- Aggiungi una linea di tendenza usando il modello di regressione con
abline().
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
# 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")