我想使用ggplot2绘制3条线。
我的数据看起来像这样

print(x)
     V1       V2       V3      V4
 1 -4800 25195.73 7415.219 7264.28
 2 -2800 15195.73 5415.219 7264.28
从这个例子中,我了解到我需要将数据重塑为如下形式:
     id       x       y
1     1     -4800   25195.73
2     1     -2800   15195.73
3     2     -4800   7415.219
4     2     -2800   5415.219
5     3     -4800   7264.28
6     3     -2800   7264.28
我该如何重塑?

最佳答案

现在,使用新的tidyr::pivot_longer非常简单

library(tidyverse)

mydat <- read.table(text = "V1       V2       V3      V4
1 -4800 25195.73 7415.219 7264.28
2 -2800 15195.73 5415.219 7264.28")

mydat %>% pivot_longer(cols = -V1)
#> # A tibble: 6 x 3
#>      V1 name   value
#>   <int> <chr>  <dbl>
#> 1 -4800 V2    25196.
#> 2 -4800 V3     7415.
#> 3 -4800 V4     7264.
#> 4 -2800 V2    15196.
#> 5 -2800 V3     5415.
#> 6 -2800 V4     7264.

# or you could then pipe this directly to your ggplot call
mydat %>%
  pivot_longer(cols = -V1) %>%
  ggplot(aes(V1, value, color = name)) +
  geom_line()

reprex package(v0.3.0)创建于2020-07-30

关于r - 使用ggplot2重塑数据以在R中绘制,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/13250872/

10-10 02:12