R图表连接不同的趋势线，我该如何阻止？

Question

以下是一些重现我看到的效果的代码：

library(datasets)
library(caret)


utils.plot.summaryMetrics <- function(path, model) {
    # multiclass metrics
    for (stat in colnames(model$results)) {
        if (!all(is.na(model$results[,stat]))) {
            filepath <- sprintf("%s/%s.pdf", path, stat)
            message(sprintf("Saving %s.pdf graph to trial", stat))
            ggplot(model, metric=stat) + geom_line(colour="cornflowerblue") + geom_point(colour="coral")
            ggsave(filepath)
        } else {
            message(sprintf("Stat column has all null values: %s", stat))
        }
    }
}

result <- train(Species ~., data = iris, method='nnet')

utils.plot.summaryMetrics(".", result)

# produces graphs where the different plot lines are interconnected.
# example -> http://i.imgur.com/Fx0l2Wq.png
# this should be 3 parallel lines, but instead a box has been drawn connecting 
# points. how do get rid of the box lines?

以下是输出图像的示例，其中平行线相互连接，创建一个框：

Answer 1

所以，对于R我来说是新手，我承认货物有点傻逼。似乎罪魁祸首是geom_line（..）func。我尝试添加一个组参数，但没有去。

最后，删除这两个会产生没有互连线的图形。

虽然不是一个完美的答案，但它已经足够好了＃34;目前。但我很乐意将选定的答案翻转给能够提供更有力解释的人。