Thêm đường làm mượt tuyến tính
Bạn đã thấy cách thêm các đường LOESS vào biểu đồ phân tán bằng cách dùng cả hai trace add_markers() và add_lines(). Thêm một đường làm mượt tuyến tính cũng làm tương tự, nhưng bạn dùng lệnh lm() để khớp mô hình tuyến tính.
Trong bài này, nhiệm vụ của bạn là thêm một đường làm mượt tuyến tính vào biểu đồ phân tán giữa điểm người dùng và điểm nhà phê bình cho các trò chơi điện tử năm 2016.
Khi thêm các đường làm mượt, giá trị thiếu (NA) có thể gây rắc rối vì nhiều hàm mô hình sẽ tự động loại bỏ các quan sát bị thiếu. Để tránh xung đột này, hãy dùng select() và na.omit() để xóa các quan sát trước khi vẽ.
Lưu ý rằng plotly và dữ liệu vgsales2016 đã được nạp sẵn cho bạn.
Bài tập này là một phần của khóa học
Trực quan hóa dữ liệu tương tác với plotly trong R
Hướng dẫn bài tập
- Khớp một mô hình hồi quy tuyến tính với
Critic_Scorelà biến dự báo vàUser_Scorelà biến phản hồi. Lưu mô hình này vào đối tượngm. - Tạo biểu đồ phân tán với
Critic_Scoretrên trục x vàUser_Scoretrên trục y. - Thêm một đường làm mượt tuyến tính vào biểu đồ để biểu diễn các giá trị khớp.
Bài tập tương tác thực hành trực tiếp
Hãy thử làm bài tập này bằng cách hoàn thành đoạn mã mẫu này.
# Fit the regression model of User_Score on Critic_Score
m <- lm(___ ~ ___, data = ___)
# Create the scatterplot with smoother
vgsales2016 %>%
select(User_Score, Critic_Score) %>%
na.omit() %>%
___(x = ___, y = ___) %>%
___(showlegend = FALSE) %>%
___(y = ___)