使用facet_wrap在每个facet中放置2条或多条线

我有一个简化的

df

，我正在使用facet_wrap（）绘制多个变量：

Day <- (1:30)

Type <-  rep(c("A", "B","C"),10)

Value_1 <- runif(30, min=-1, max=2)
Value_2 <- runif(30, min=-1, max=2)

df <- tibble:: tibble(Day, Type, Value_1, Value_2)


 ggplot2:: ggplot(df, aes(x=Day, y=Value_1, color= Type))+
  geom_line()+
   facet_wrap(~Type)

Day尝试将此重塑数据变长：

library(ggplot2)
library(tidyverse)
#Code
df %>% pivot_longer(-c(Day,Type)) %>%
  ggplot(aes(x=Day, y=value, color= name,group=name))+
  geom_line()+
  facet_wrap(~Type)

输出：