將長數據重塑為多個寬列

Question

我有長格式的數據，我需要有選擇地轉換為寬格式。

這是我擁有的和需要的示例

Rating <- c("Overall","Overall_rank","Total","Total_rank")
value <- c(6,1,5,2)

example <- data.frame(Rating,value)

創建如下所示的數據：

Rating         value
Overall          6
Overall_rank     1
Total            5
Total_rank       2

但是，我希望我的數據看起來像：

我嘗試pivot_wider ，但似乎無法得到它。

Answer 1

這對您的實際情況有用嗎？

我認為混淆源於將第 1 列稱為“評級”，而實際上“評級”值（據我所知）包含在第 1 行和第 3 行中。

example %>%
  separate(Rating, sep = "_", into = c("Category", "type")) %>%
  mutate(type = replace(type, is.na(type), "rating")) %>%
  pivot_wider(names_from = type, values_from = value)

  Category rating  rank
  <chr>     <dbl> <dbl>
1 Overall       6     1
2 Total         5     2