我试图添加一个凸包在这个图中的每一组使用ggpubr包?为什么不起作用?
代码:
library(dplyr)
library(MASS)
library(ggplot2)
library(scales)
library(ggpubr)
library(data.table)
irisfda <- fda(Species ~ ., data = iris, method = mars)
df1 <- cbind(data.frame(irisfda$fit$fitted.values), species = iris[,"Species"])
ggplot(df1) +
geom_point(aes(X1, X2, color = species, shape = species), size = 2.5) +
labs(x = "FDA1",y = "FDA1") +
stat_chull(aes(color = species, fill = species), geom = "polygon", alpha = 0.1) 发布于 2020-09-01 12:07:36
你还没有告诉stat_chull x和y点在哪里。您告诉geom_point它们在哪里,但是当您将它们添加到一个情节中时,geoms和stats不会相互继承。您可以直接将x和y坐标添加到stat_chull,或者更好地将它们添加到ggplot调用中。然后stat_chull可以继承它们,并且可以保存一些类型。
顺便说一句,您对dplyr、Mass、scales和data.table使用了data.table调用,这在本例中是不需要的,但是您忘记了将库调用放在mda上,这是必需的:
library(ggplot2)
library(ggpubr)
library(mda)
irisfda <- fda(Species ~ ., data = iris, method = mars)
df1 <- cbind(data.frame(irisfda$fit$fitted.values), species = iris[,"Species"])
ggplot(df1, aes(x = X1, y = X2, color = species, shape = species)) +
geom_point(size = 2.5) +
labs(x = "FDA1",y = "FDA1") +
stat_chull(geom = "polygon", alpha = 0.1)

https://stackoverflow.com/questions/63687115
复制相似问题