При добавлении линии тренда линейной модели в блочную диаграмму с использованием стандартной графики R я использую:
boxplot(iris[,2]~iris[,1],col="LightBlue",main="Quartile1 (Rare)")
modelQ1<-lm(iris[,2]~iris[,1])
abline(modelQ1,lwd=2)
Однако при использовании этого в ggplot2:
a <- ggplot(iris,aes(factor(iris[,1]),iris[,2]))
a + geom_boxplot() +
geom_smooth(method = "lm", se=FALSE, color="black", formula=iris[,2]~iris[,1])
я получаю следующую ошибку:
geom_smooth: Only one unique x value each group.Maybe you want aes(group = 1)?
И линия не появляется на моем графике.
Модели, используемые в обоих этих сценариях, идентичны. Если бы кто-нибудь мог указать, где я ошибаюсь, это было бы здорово.
РЕДАКТИРОВАТЬ: Использовался набор данных радужной оболочки например.