我有一个这样的数据框：
> mydata <- read.csv("mydata.csv", header=T, stringsAsFactors=F)
> tbl_df(mydata)
# A tibble: 16,499 x 60
SRC_035_01 SRC_035_01.1 SRC_035_02 SRC_035_02.1
1 Force Time Force Time
2 -0.0037 0.000 0.0041 0.000
3 0.0000 0.004 0.0073 0.004
4 0.0079 0.008 0.0156 0.008
5 0.0150 0.012 0.0228 0.012
6 0.0177 0.016 0.0262 0.016
7 0.0141 0.020 0.0236 0.020
8 0.0103 0.024 0.0206 0.024
9 0.0080 0.028 0.0193 0.028
10 0.0102 0.032 0.0226 0.032
我需要逐列地将第一行与标题组合在一起，从而产生此输出：
# A tibble: 16,498 x 60
SRC_035_01_Force SRC_035_01.1_Time SRC_035_02_Force SRC_035_02.1_Time
2 -0.0037 0.000 0.0041 0.000
3 0.0000 0.004 0.0073 0.004
4 0.0079 0.008 0.0156 0.008
5 0.0150 0.012 0.0228 0.012
6 0.0177 0.016 0.0262 0.016
7 0.0141 0.020 0.0236 0.020
8 0.0103 0.024 0.0206 0.024
9 0.0080 0.028 0.0193 0.028
10 0.0102 0.032 0.0226 0.032
任何人都可以给我一个代码提示吗？
非常感谢！