具有适当组集的锯齿状绘图线（R 中的 ggplot）

Question

我正在尝试使用以下代码创建折线图：

    ggplot(lnewdat, aes(x = Cl, y = Probability, colour = Level, group = Level)) + geom_smooth(stat = 'identity') + facet_grid(Species~Year)

我得到一个与此图类似的图：

当寻找锯齿线的解决方案，一切都提到设置“组”。正如你从我的代码中看到的，我已经做到了。感谢您的帮助！