Tracer P/B vs ROE
Maintenant que vous avez calculé le ROE et les multiples P/B pour les entreprises midcap du secteur Consommation discrétionnaire, nous pouvons tracer le multiple P/B (axe des y) en fonction du ROE (axe des x). Nous ajouterons ensuite une ligne de tendance au graphique pour illustrer visuellement la relation éventuelle entre les deux variables. Les données pour roe et p_bv se trouvent dans l’ensemble de données cons_disc.
Cet exercice fait partie du cours
Évaluation des actions avec R
Instructions
- Définissez la plage de l’axe des x pour couvrir l’ensemble des valeurs de ROE à l’aide de
min()etmax(). - Définissez la plage de l’axe des y pour couvrir l’ensemble des valeurs de P/B à l’aide de
min()etmax(). - Tracez les données P/B vs ROE et ajoutez les étiquettes d’axes x "Return on Equity" et y "Price-to-Book".
- Ajoutez une ligne de tendance à l’aide du modèle de régression avec
abline().
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# 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")