R) 如何將唯一 ID 中的 2 個唯一值作為該唯一 ID 的兩個新列移動？

Question

z <- c("1001","1001","1002","1002")
h <- c("Yes","No","Yes","No")
count <- c("300","200","500","100")
df = data.frame(z,h,count)
df
      z   h count
  1 1001 Yes   300
  2 1001  No   200
  3 1002 Yes   500
  4 1002  No   100

在這里，我在“z”列中有兩個重復的值，但在“h”和“count”中具有不同的值。 我想創建兩個名為“h2”和“count2”的新列，它們具有“z”中每個唯一 ID 的唯一值。 這是預期的結果。 我將如何在代碼中編寫它？

           z  h count   h2    count2
      1 1001 Yes   300  No    200
      2 1002 Yes   500  No    100
     

Answer 1

我相信你正在尋找pivot_wider() function

df %>% 
  pivot_wider(names_from = c(h),values_from = c(h,count)) %>% 
  rename(z=z,h=h_Yes,h2=h_No,count=count_Yes,count2=count_No)