Parental Involvement Group Discussion 6

Parental Involvement vs. Student Grades

# Create scatter plot with regression line
ggplot(data, aes(x = Parent_Involvement_Score, y = Student_Grades_Avg)) +
  geom_point() +
  geom_smooth(method = "lm", col = "blue") +
  labs(title = "Parental Involvement vs. Student Grades",
       x = "Parent Involvement Score",
       y = "Student Grades (Avg)")