R 在一个图中绘制威布尔分布的多条曲线

我需要在一张图中绘制具有不同形状和比例参数的威布尔分布的多条曲线。我可以用以下代码绘制第一条曲线：

x=seq(1,15,0.1)
plot(dweibull(x, shape= 3.2, scale=5.6), type="l", col= "red")

---

现在，我想在同一个绘图中添加具有不同形状和比例参数的其他曲线（例如：形状=2.8，比例=6.4）。非常感谢您的帮助

基于tidyverse的解决方案可以是：

d1 <- tibble(
        Shape=3.2, 
        Scale=5.6, 
        Colour="red", 
        X=seq(1, 15, 0.1), 
        Y=dweibull(X, Shape, Scale)
       )
d2 <- tibble(
        Shape=2.8, 
        Scale=6.4, 
        Colour="blue", 
        X=seq(1, 15, 0.1), 
        Y=dweibull(X, Shape, Scale)
      )

d <- d1 %>% bind_rows(d2)
d %>% ggplot() + geom_line(aes(x=X, y=Y, colour=Colour))

d <- tibble() %>% 
       expand(
         Shape=c(3.2, 5.6),
         Scale=c(2.8, 6.4),
         X=seq(1, 15, 0.1)
       ) %>% 
       mutate(
         Y=dweibull(X, Shape, Scale)
       )
d %>% 
  ggplot() + 
    geom_line(aes(x=X, y=Y, linetype=as.factor(Shape), colour=as.factor(Scale)))

d1
line（dweibull（x，形状=2.8，比例=6.4），type=“l”，col=“blue”）