在R中没有时间变量时，如何按时间绘图？

我有一个由四个团队组成的数据集，他们每周接受5周的调查。我想得到5周内每个变量的折线图，但我没有一个周变量放在x轴上，所以我不知道如何操作数据来得到它

我得到的数据类似于这个示例，使用了5周内测量的1个变量：

          var_week1   var_week2    var_week3    var_week4    var_week5    
team_a            5         3.2            7          6.4            6
team_b            3           4            4            3            4
team_c          7.6           5          3.8            6            4
team_d            5           3          2.7            4            3

我想得到这样一个图，x轴上有周，y轴上有var值，每个团队有一条线：

---

这是一个从宽到长的问题。一个tidyverse解决方案，假设您的数据框名为mydata，并且具有行名称，如示例所示：

library(tidyverse)

mydata %>% 
  rownames_to_column(var = "team") %>% 
  gather(Week, Value, -team) %>% 
  mutate(Week = as.numeric(gsub("var_week", "", Week))) %>% 
  ggplot(aes(Week, Value)) + 
  geom_line(aes(color = team))

结果: