R 在一个数据帧中转换一行中的两行

我有这样一个数据框：

> 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

谁能给我一个代码提示

---

非常感谢

请检查您是如何读取数据的。可能您应该使用

skip=2

即

df1
粘贴（colnames（mtcars），mtcars[1，]，sep=“”）
可能有用。不工作。。。在第一个解决方案中，readLines输出一个长度为2的向量，所有文本都是一个唯一的元素，如下：
>行[2][2]“力、时间、力、时间、力、时间、力、时间、力、时间、力、时间、力、时间、力、时间、力、时间、力、力、时间、力、时间、力、力、时间、力、时间、力、力、时间（…）”
所以列名都是这样的：
SRC_035_01_Force，Time，Force，Time，Force，Time，（…）
使用第二种方法，结果非常相似：(
# 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