diff --git a/NEWS.md b/NEWS.md index 003b3d2c..4cbeb51c 100644 --- a/NEWS.md +++ b/NEWS.md @@ -2,6 +2,7 @@ * anomaly tour is initialised with a random basis * option to label only long axes +* bug fix for save_history with lda_pp # tourr 1.2.0 diff --git a/R/interesting-indices.r b/R/interesting-indices.r index 3cb1997d..1eecf72d 100644 --- a/R/interesting-indices.r +++ b/R/interesting-indices.r @@ -150,7 +150,7 @@ lda_pp <- function(cl) { 1 - summary(fit, test = "Wilks")$stats[[3]] } else { - summary(stats::aov(mat ~ cl))[[1]][4] + summary(stats::aov(mat ~ cl))[[1]][1,4] } } }