ComenzarEmpieza gratis

Ingeniería manual de una característica

Tras investigar con tu equipo, recuerdas que la fuerza gravitatoria de atracción entre dos cuerpos obedece a la fórmula de Newton:

$$F = G\frac{m_1m_2}{r^2}$$.

No puedes usar la fórmula directamente porque se desconocen las masas, pero sí puedes ajustar un modelo de regresión de force en función de inv_square_distance. El conjunto de datos ampliado df que construiste en el ejercicio anterior ya está cargado.

Este ejercicio forma parte del curso

Ingeniería de características en R

Ver curso

Instrucciones del ejercicio

  • Crea una nueva variable inv_square_distance definida como el recíproco de la distancia al cuadrado y añádela al data frame df.
  • Construye un modelo de regresión simple con lm() de force frente a inv_square_distance y guárdalo como lr_force_2.
  • Vincula tus predicciones a df_inverse.

Ejercicio interactivo práctico

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

# Create a new variable inv_square_distance
df_inverse <- df %>% ___(inv_square_distance = 1/distance^2)

# Build a simple regression model
lr_force_2 <- lm(force ~ ___, data = df_inverse)

# Bind your predictions to df_inverse
df_inverse <- df_inverse %>% ___(lr2_pred = predict(lr_force_2))

df_inverse %>% ggplot(aes(x = distance, y = force)) +
  geom_point() +
  geom_line(aes(y = lr2_pred), col = "blue", lwd = .75) +
  ggtitle("Linear regression of force vs. inv_square_distance") +
  theme_classic()
Editar y ejecutar código