您能否使用GGR中ggplot2的GGIMULATION包跟踪并标记单个冲积层？

我正在研究R中的冲积图，基于GGR中的“学生课程”示例。我希望能够通过在每个轴上标记冲积层，在整个图表中跟踪单个队列/冲积层（在专业数据集中，单个学生）。然而，我发现它只适用于lode.Guidence（在geom_flow中）设置为“之字形”的情况，没有其他设置

使用vignette示例，您可以使用学生ID号标记alluvia，如下所示。我对vignette示例所做的唯一更改都标有注释：

    library(ggplot2)
    library(ggalluvial)

    data(majors)
    majors$curriculum <- as.factor(majors$curriculum)
    ggplot(majors,
       aes(x = semester, stratum = curriculum, alluvium = student,
           fill = curriculum, label = student)) + #changed from label = alluvium
    scale_fill_brewer(type = "qual", palette = "Set2") +
    geom_flow(stat = "alluvium", lode.guidance = "frontback",
            color = "darkgray") + #can change lode.guidance parameter here in geom_flow
    geom_stratum() +
    geom_text(stat = "alluvium", size = 3) #added this geom_text to get the label

库（ggplot2）
图书馆（GG）
数据（专业）
当然，无论参数设置如何，每个冲积层都应该对应一个单独的情况。这里的问题是，冲积层统计数据（统计转换）用于在不同参数设置下在绘图中生成两个层：将
lode.guidance
设置为
“frontback”
的流动层和将
lode.guidance
默认设置为
“之字形”的文本层。这在中进行了简要讨论，但在其他方面没有很好的文档记录

一种解决方案是确保在绘图中每次使用任何stat都传递相同的参数。另一个是设置一个全局参数，用于控制每个统计的默认设置。下面两个参数都用于生成我认为您心目中的绘图

库（gg）
#>加载所需包：ggplot2
数据（专业）
专业课程