r - 如何使用 R reshape 数据框以将列转换为行？

Question

抱歉，如果标题不清楚，我不能 100% 地表达我的问题。我有一个看起来像这样的数据框:

<表类=“s-表”><标题>日期位置 A 变量 1位置 A 变量 2位置 B 变量 1位置 B 变量 2 <正文>1 月 20 日22222 月 20 日2222......22212 月 20 日2222

我希望它看起来像这样:

<表类=“s-表”><标题>日期位置变量 1变量 2变量... <正文>1 月 20 日一个22。1 月 20 日B22。2 月 20 日一个22。2 月 20 日B22。......22。12 月 20 日一个22。12 月 20 日B22。

Answer 1

如果列名中有空格

library(tidyr)
pivot_longer(df1, cols = -date, names_to = c("Location", ".value"), 
     names_pattern = "\\w+\\s+(\\w+)\\s+(.*)")

-输出

# A tibble: 4 × 4
  date   Location `Variable 1` `Variable 2`
  <chr>  <chr>           <int>        <int>
1 Jan 20 A                   2            2
2 Jan 20 B                   2            2
3 Feb 20 A                   2            2
4 Feb 20 B                   2            2

数据

df1 <- structure(list(date = c("Jan 20", "Feb 20"), `Location A Variable 1` = c(2L, 
2L), `Location A Variable 2` = c(2L, 2L), `Location B Variable 1` = c(2L, 
2L), `Location B Variable 2` = c(2L, 2L)), class = "data.frame", row.names = c(NA, 
-2L))