R- 从列到行不带 header

R- from columns to rows without taking the header

我每个公司8个变量,一共25家公司。但是,我不需要对这些公司进行任何区分。如果您查看示例:我需要在一列中包含 AH 和 JUMBO,AHQ1 和 JUMBOQ1 以及两个 Q2 都相同。通过这种方式,我没有 6 列,而在这些行中只有 3 和两倍的观察值。栏目标题可以保留AH、AHQ1、AHQ2。

提前感谢任何提示!!

数据示例:

df <- data.frame("ID" = c(1,1,2,2,2,2), "Year" = c(2012, 2015,2012,2013,2015,2016), 
"AH" = c(1, NA, 1,1,1,1), "AHQ1" = c(8, NA,7,8,9,10),
             "AHQ2" = c(10,NA,7,8,5,2),"JUMBO" = c(NA,NA,1,1,1,NA), 
"JUMBOQ1" = c(NA,NA,8,9,7,NA), "JUMBOQ2"= c(NA,NA,10,9,7,NA))
temp <- cbind(df[1:2], df[6:8])
names(temp) <- names(df[1:5])

df2 <- rbind(df[1:5], temp)

> df2
   ID Year AH AHQ1 AHQ2
1   1 2012  1    8   10
2   1 2015 NA   NA   NA
3   2 2012  1    7    7
4   2 2013  1    8    8
5   2 2015  1    9    5
6   2 2016  1   10    2
7   1 2012 NA   NA   NA
8   1 2015 NA   NA   NA
9   2 2012  1    8   10
10  2 2013  1    9    9
11  2 2015  1    7    7
12  2 2016 NA   NA   NA

这是您要找的吗?