有没有一种简单的方法可以让数据框看起来不错？

Question

我有一个数据框，它的结构对于某些用途来说很好，但绝对不适合 GGPLOT。有没有改造的功能

x <- data.frame(head_1 = c(1,2,3,1,2,3),
           head_2 = c(4,5,6,1,2,3),
            date = c("01-01-2019","01-01-2019","01-01-2019","02-01-2019","02-01-2019","02-01-2019"))

进入

y <- data.frame(type= c("head_1","head_1","head_1","head_1","head_1","head_1",
                    "head_2","head_2","head_2","head_2","head_2","head_2"),
            date = c("01-01-2019", "01-01-2019","01-01-2019","01-01-2019","01-01-2019","01-01-2019",
                     "02-01-2019", "02-01-2019","02-01-2019","02-01-2019","02-01-2019","02-01-2019"),
            value= c(1,2,3,1,2,3,4,5,6,1,2,3 ))

Answer 1

使用tidyr包修订版>1.0中新增的pivot_longer函数可以在一行中进行转换。

library(tidyr)
y<-pivot_longer(x, cols = starts_with("head"), names_to = "type", values_to = "value")

y

 A tibble: 12 x 3
   date       type   value
   <fct>      <chr>  <dbl>
 1 01-01-2019 head_1     1
 2 01-01-2019 head_2     4
 3 01-01-2019 head_1     2
 4 01-01-2019 head_2     5
 5 01-01-2019 head_1     3
 6 01-01-2019 head_2     6
 7 02-01-2019 head_1     1
 8 02-01-2019 head_2     1
 9 02-01-2019 head_1     2
10 02-01-2019 head_2     2
11 02-01-2019 head_1     3
12 02-01-2019 head_2     3