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