我如何从不同的列中收集日期并将它们全部放入一列中?

问题描述 投票:0回答:1

我从丹麦足球联赛 Superligaen 获取了数据。当打开我从 url 获得的数据框时,回合与游戏进行的日期一起被分成不同的列。如何将所有日期合并到 1 列而不是现在的 33 列/轮?

这是数据框外观的照片:

这是我想要的样子的照片:

我对此很陌生,所以除了询问 ChatGPT 之外我没有尝试太多。

数据:

> dput(head(sason_07_08_super, 20))
structure(list(`Runde 1...1` = c("Ons", "Ons", "Ons", "Ons", 
"Ons", "Ons", NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA), `Runde 1...2` = c("18/07 18.00", "18/07 18.00", "18/07 20.00", 
"18/07 20.00", "25/07 20.00", "08/08 20.00", NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), ...3 = c("FCN-FCK", 
"RFC-VFF", "EFB-BIF", "AGF-ACH", "OB-LBK", "FCM-AaB", "BIF-FCN", 
"VFF-EFB", "LBK-RFC", "AGF-OB", "ACH-FCM", "AaB-FCK", "FCK-VFF", 
"OB-ACH", "FCN-LBK", "FCM-BIF", "EFB-AGF", "RFC-AaB", "AGF-FCK", 
"EFB-RFC"), ...4 = c("1-0", "2-0", "1-0", "1-2", "1-1", "2-1", 
"2-2", "0-5", "0-3", "0-2", "2-1", "1-1", "3-1", "3-3", "0-1", 
"5-0", "2-2", "5-0", "0-1", "1-3"), ...5 = c(9.045, 5.851, 11.008, 
12.562, 7.598, 7.665, 9.865, 3.164, 1.631, 7.662, 2.149, 9.784, 
12.337, 6.541, 5.065, 10.137, 8.845, 8.889, 13.217, 8.502), ...6 = c("Henning Jensen", 
"Henrik Kragh", "Anders Hermansen", "Jesper Overgaard", "Emil Laursen", 
"Claus Bo Larsen", "Anders Hermansen", "Henning Jensen", "Thomas Vejlgaard", 
"Henrik Priegel", "Lars Christoffersen", "Nicolai Vollquartz", 
"Michael Svendsen", "Michael Johansen", "Jesper Overgaard*", 
"Nicolai Vollquartz", "Henrik Kragh", "Emil Laursen", "Claus Bo Larsen", 
"Michael Svendsen"), ...7 = c(NA, NA, NA, NA, NA, NA, NA, NA, 
NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA), `Runde 2...1` = c(NA, 
NA, NA, NA, NA, NA, "Lør", "Søn", "Søn", "Søn", "Man", "Ons", 
NA, NA, NA, NA, NA, NA, NA, NA), `Runde 2...2` = c(NA, NA, NA, 
NA, NA, NA, "21/07 17.00", "22/07 14.00", "22/07 16.00", "22/07 18.00", 
"23/07 19.00", "25/07 18.00", NA, NA, NA, NA, NA, NA, NA, NA), 
    `Runde 3...1` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, "Lør", "Søn", "Søn", "Søn", "Man", "Ons", NA, 
    NA), `Runde 3...2` = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, "28/07 17.00", "29/07 14.00", "29/07 16.00", 
    "29/07 18.00", "30/07 19.00", "01/08 20.00", NA, NA), `Runde 4...1` = c(NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, "Lør", "Søn"), `Runde 4...2` = c(NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, "04/08 17.00", 
    "05/08 14.00"), `Runde 5...1` = c(NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_), `Runde 5...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 6...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 6...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 7...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 7...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 8...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 8...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 9...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 9...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 10...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 10...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 11...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 11...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 12...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 12...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 13...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 13...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 14...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 14...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 15...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 15...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 16...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 16...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 17...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 17...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 18...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 18...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 19...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 19...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 20...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 20...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 21...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 21...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 22...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 22...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 23...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 23...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 24...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 24...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 25...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 25...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 26...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 26...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 27...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 27...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 28...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 28...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 29...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 29...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 30...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 30...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 31...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 31...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 32...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 32...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 33...1` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_), `Runde 33...2` = c(NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_, NA_character_, 
    NA_character_, NA_character_, NA_character_)), row.names = c(NA, 
-20L), class = c("tbl_df", "tbl", "data.frame"))
r dataframe merge mutate
1个回答
0
投票

步骤:

  1. 我们创建一个 id 列(不是绝对必要的,但这是一个很好的做法,因为你没有主键
  2. 我们将数据旋转得更久,将 Runde 列名称解析为它们的编号,然后将它们在每个 Runde 中的列编号解析。然后,我们得到 Runde 列,其中包含 Runde 编号,以及列
    1
    2
    ,其中包含星期几以及纯文本形式的日期和时间。

您可以将其留在那里,然后只需选择您要使用的列。但作为练习,这就是我要做的,以使数据整洁:

  1. 将比赛栏分为主队和客队栏,这将使以后更容易使用
  2. 对分数数据做同样的事情
  3. 仅仅将分数数据列分成两部分并不能改变它们仍然是字符串列的事实,我们需要对它们进行变异以将它们转换为整数列,以便我们可以对它们执行算术
  4. 为出勤栏命名,并以正确的单位给出
  5. 给裁判栏起个名字
  6. 将日期时间列解析为日期时间格式,这样更容易使用
  7. 删除我们使用过但不再需要的列,例如
    ...6
  8. 删除星期列
    1
    和 NA 列
    ...7
df |> 
  mutate(id = row_number()) |>
  pivot_longer(cols = starts_with("Runde"), names_pattern = "Runde (\\d+)...(\\d+)", names_to = c("Runde", ".value"), values_drop_na = TRUE) |>
  separate_wider_delim(col = `...3`, names = c("Hjemmehold", "Udehold"), delim = "-") |>
  separate_wider_delim(col = `...4`, names = c("Hjemmeholdsmål", "Udeholdsmål"), delim = "-") |>
  mutate(across(c(Hjemmeholdsmål, Udeholdsmål), as.integer),
        Tilstedeværelse = `...5` * 1000,
         Dommer = `...6`,
         datotid = as.POSIXct(`2`, format = "%d/%m %H.%M", tz = "Europe/Copenhagen"),
         .keep = "unused") |>
         select(-`...7`, -`1`)

输出:

# A tibble: 20 × 9
   Hjemmehold Udehold Hjemmeholdsmål Udeholdsmål    id Runde Tilstedeværelse
   <chr>      <chr>            <int>       <int> <int> <chr>           <dbl>
 1 FCN        FCK                  1           0     1 1                9045
 2 RFC        VFF                  2           0     2 1                5851
 3 EFB        BIF                  1           0     3 1               11008
 4 AGF        ACH                  1           2     4 1               12562
 5 OB         LBK                  1           1     5 1                7598
 6 FCM        AaB                  2           1     6 1                7665
 7 BIF        FCN                  2           2     7 2                9865
 8 VFF        EFB                  0           5     8 2                3164
 9 LBK        RFC                  0           3     9 2                1631
10 AGF        OB                   0           2    10 2                7662
11 ACH        FCM                  2           1    11 2                2149
12 AaB        FCK                  1           1    12 2                9784
13 FCK        VFF                  3           1    13 3               12337
14 OB         ACH                  3           3    14 3                6541
15 FCN        LBK                  0           1    15 3                5065
16 FCM        BIF                  5           0    16 3               10137
17 EFB        AGF                  2           2    17 3                8845
18 RFC        AaB                  5           0    18 3                8889
19 AGF        FCK                  0           1    19 4               13217
20 EFB        RFC                  1           3    20 4                8502
   Dommer              datotid            
   <chr>               <dttm>             
 1 Henning Jensen      2023-07-18 18:00:00
 2 Henrik Kragh        2023-07-18 18:00:00
 3 Anders Hermansen    2023-07-18 20:00:00
 4 Jesper Overgaard    2023-07-18 20:00:00
 5 Emil Laursen        2023-07-25 20:00:00
 6 Claus Bo Larsen     2023-08-08 20:00:00
 7 Anders Hermansen    2023-07-21 17:00:00
 8 Henning Jensen      2023-07-22 14:00:00
 9 Thomas Vejlgaard    2023-07-22 16:00:00
10 Henrik Priegel      2023-07-22 18:00:00
11 Lars Christoffersen 2023-07-23 19:00:00
12 Nicolai Vollquartz  2023-07-25 18:00:00
13 Michael Svendsen    2023-07-28 17:00:00
14 Michael Johansen    2023-07-29 14:00:00
15 Jesper Overgaard*   2023-07-29 16:00:00
16 Nicolai Vollquartz  2023-07-29 18:00:00
17 Henrik Kragh        2023-07-30 19:00:00
18 Emil Laursen        2023-08-01 20:00:00
19 Claus Bo Larsen     2023-08-04 17:00:00
20 Michael Svendsen    2023-08-05 14:00:00
© www.soinside.com 2019 - 2024. All rights reserved.