我想使用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/