給定以下 ggpairs 繪圖:
data(iris)
ggpairs(iris[1:4],
lower=list(
mapping = aes(color=iris$Species),
continuous = wrap("points", size=0.7)
)
)
結果是:

如何將單個回歸線添加到每個散點圖,而不像添加時那樣將回歸線映射到分組continuous = wrap("smooth")?
我希望這些點按組著色,但總體上 x 和 y 變數之間的關系的回歸線。
我不知道在哪里放置 aes 映射,以便它只影響“點”而不是“平滑”。
uj5u.com熱心網友回復:
如果您想要這樣的專門繪圖,您需要創建自己的函式。它必須采用特定格式,采用data,mapping和...引數,并從這些中創建一個 ggplot:
library(GGally)
my_func <- function(data, mapping, ...) {
ggplot(data, mapping)
geom_point(size = 0.7)
geom_smooth(formula = y~x, method = loess, color = "black")
}
ggpairs(iris[1:4],
lower=list(
mapping = aes(color=iris$Species),
continuous = my_func
)
)

如果您正在尋找一條直線回歸線,則只需根據需要進行修改my_func。例如,
my_func <- function(data, mapping, ...) {
ggplot(data, mapping)
geom_point(size = 0.7)
geom_smooth(formula = y~x, method = lm, color = "black", se = FALSE,
linetype = 2)
}
給你:

轉載請註明出處,本文鏈接:https://www.uj5u.com/yidong/471570.html
