Kết hợp join vào quy trình data.table

Kết hợp dữ liệu với data.table trong R

Scott Ritchie

Postdoctoral Researcher in Systems Genomics

Xâu chuỗi biểu thức data.table

Các biểu thức data.table có thể được xâu chuỗi tuần tự:

demographics[...][...]

Dạng chung khi xâu chuỗi một join:

DT1[DT2, on][i, j, by]
    |    |   |  |  |
    |    |   |  |   --> nhóm theo gì?
    |    |   |   -----> làm gì?
    |    |    --------> trên những hàng nào?
    |     ------------> cột khóa để join
     -----------------> join với data.table nào?
Kết hợp dữ liệu với data.table trong R

Join rồi mới tính toán

customers <- data.table(name   = c("Mark", "Matt", "Angela", "Michelle"), 
                        gender = c("M", "M", "F", "F"), 
                        age    = c(54, 43, 39, 63))
customers
       name gender age
1:     Mark      M  54
2:     Matt      M  43
3:   Angela      F  39
4: Michelle      F  63
Kết hợp dữ liệu với data.table trong R

Join rồi mới tính toán

purchases <- data.table(name  = c("Mark", "Matt", "Angela", "Michelle"),
                        sales = c(1, 5, 4, 3),
                        spent = c(41.70, 41.78, 50.77, 60.01))
purchases
       name sales spent
1:     Mark     1 41.70
2:     Matt     5 41.78
3:   Angela     4 50.77
4: Michelle     3 60.01
Kết hợp dữ liệu với data.table trong R

Join rồi mới tính toán

customers[purchases, 
          on = .(name)][sales > 1, 
                        j = .(avg_spent = sum(spent) / sum(sales)), 
                        by = .(gender)] 
   gender avg_spent
1:      M  13.91333
2:      F  20.00333
Kết hợp dữ liệu với data.table trong R

Tính toán với join

Tính toán cùng với join:

DT1[DT2, on, j]
    |    |   | 
    |    |    ----> làm gì trên kết quả join?
    |     --------> dùng cột nào làm khóa? 
     -------------> join với data.table nào?

Hiệu quả cho data.table lớn!

Kết hợp dữ liệu với data.table trong R

Join và tạo cột

Tạo cột diễn ra trong data.table chính:

customers[purchases, on = .(name), return_customer := sales > 1]
customers
       name gender age return_customer
1:     Mark      M  54           FALSE
2:     Matt      M  43            TRUE
3:   Angela      F  39            TRUE
4: Michelle      F  63            TRUE
Kết hợp dữ liệu với data.table trong R

Nhóm theo các khớp

by = .EACHI nhóm j theo từng hàng từ DT2

DT1[DT2, on, j, by = .EACHI]
    |    |   |  |
    |    |   |   --> nhóm theo từng khớp trong DT1.
    |    |    -----> làm gì trên kết quả join?
    |     ---------> dùng cột nào làm khóa? 
     --------------> join với data.table nào?
Kết hợp dữ liệu với data.table trong R

Nhóm theo các khớp

shipping[customers, on = .(name), 
         j = .("# of shipping addresses" = .N),
         by = .EACHI]

Kết hợp dữ liệu với data.table trong R

Nhóm theo cột khi join

Nhóm theo các cột trong by sẽ giới hạn tính toán vào data.table chính:

DT1[DT2, on, j, by]
    |    |   |  |
    |    |   |   --> nhóm theo các cột nào trong DT1?
    |    |    -----> làm gì trên các cột trong DT1?
    |     ---------> dùng cột nào làm khóa? 
     --------------> join với data.table nào?
Kết hợp dữ liệu với data.table trong R

Nhóm theo cột khi join

Join và tính theo nhóm trong customers:

customers[shipping, on = .(name), 
          .(avg_age = mean(age)), by = .(gender)]
   gender  avg_age
1:      M 46.66667
2:      F 39.00000
Kết hợp dữ liệu với data.table trong R

Cùng luyện tập nào!

Kết hợp dữ liệu với data.table trong R

Preparing Video For Download...