生成具有多个方面的条形图

Question

我有一个具有以下结构的数据库：

我想创建两个条形图，具有两个方面（Sin 和 T），X 轴为时间，Y 轴为不同的 A , 乙, C、D 和 E 列（列可以堆叠或不堆叠）。

我怎样才能做到这一点？

提前致谢。

Answer 1

像这样的东西吗？

library(tidyverse)

df %>% 
  pivot_longer(
    -c(COND, Time)
  ) %>% 
  ggplot(aes(x=factor(Time), y = value, fill=name)) +
  geom_col(position = position_dodge())+
  facet_wrap(.~COND)+
  xlab("Time")

数据：

df <- structure(list(COND = c("Sin", "Sin", "Sin", "Sin", "T", "T", 
"T", "T"), Time = c(0L, 1L, 6L, 8L, 0L, 1L, 6L, 8L), A = c(54L, 
202L, 155L, 202L, 244L, 321L, 149L, 155L), B = c(1536L, 732L, 
2577L, 1321L, 1744L, 1952L, 3857L, 1780L), C = c(34018L, 80476L, 
4173L, 119L, 33851L, 56320L, 2494L, 696L), D = c(10458L, 33655L, 
357L, 452L, 10869L, 30667L, 1839L, 3315L), E = c(3500L, 1904L, 
0L, 0L, 3035L, 2839L, 0L, 0L)), class = "data.frame", row.names = c(NA, 
-8L))