ComenzarEmpieza gratis

Representa P/B frente a ROE

Ahora que has calculado el ROE y los múltiplos P/B para las empresas midcap de Consumer Discretionary, vamos a representar el múltiplo P/B (eje y) frente al ROE (eje x). Después añadiremos una línea de tendencia al gráfico para mostrar visualmente la relación, si la hay, entre ambas variables. Los datos de roe y p_bv están en el conjunto de datos cons_disc.

Este ejercicio forma parte del curso

Valoración de acciones en R

Ver curso

Instrucciones del ejercicio

  • Define el rango del eje x para cubrir todo el intervalo de valores de ROE usando min() y max().
  • Define el rango del eje y para cubrir todo el intervalo de valores de P/B usando min() y max().
  • Representa los datos de P/B frente a ROE y etiqueta el eje x como "Return on Equity" y el eje y como "Price-to-Book".
  • Añade una línea de tendencia usando el modelo de regresión con abline().

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

# 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")
Editar y ejecutar código