Bắt đầu ngayBắt đầu miễn phí

Suy luận về lưu lượng theo ngày trong tuần

Đầu ra mô phỏng RJAGS 10.000 vòng lặp, rail_sim_1, có trong workspace của bạn cùng với một data frame chứa kết quả chuỗi Markov:

> head(rail_chains_1, 2)
         a b.1.       b.2.        s 
1 420.6966    0  -54.30783 118.2328
2 399.5823    0  -52.02570 119.9499

Các chuỗi này cung cấp 10.000 bộ giá trị cho a, lưu lượng điển hình trên đường mòn vào ngày cuối tuần, và b.2., phần chênh lệch giữa lưu lượng điển hình ngày thường so với cuối tuần. Ví dụ, bộ tham số đầu tiên cho thấy thường có 420.6966 người đi vào ngày cuối tuần và ít hơn 54.30783 người vào ngày thường. Vậy nên thường có 420.6966 - 54.30783 = 366.3888 người đi vào ngày thường. Bạn sẽ dùng dữ liệu mô phỏng này để suy luận về lưu lượng trên đường mòn vào ngày thường.

Bài tập này là một phần của khóa học

Mô hình hóa Bayesian với RJAGS

Xem khóa học

Hướng dẫn bài tập

  • Kết hợp các giá trị chuỗi ab.2. để tạo một chuỗi 10.000 giá trị cho lưu lượng điển hình vào ngày thường. Lưu thành weekday_mean trong rail_chains_1.
  • Dùng ggplot() để vẽ biểu đồ mật độ cho các giá trị chuỗi weekday_mean.
  • Tạo khoảng tin cậy 95% cho lưu lượng điển hình vào ngày thường.

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.

# Construct a chain of values for the typical weekday volume
rail_chains_1 <- rail_chains_1 %>% 
    mutate(weekday_mean = ___)

# Construct a density plot of the weekday chain
ggplot(___, aes(x = ___)) + 
    geom_density()

# 95% credible interval for typical weekday volume
Chỉnh sửa và Chạy Mã