R 设置alpha并删除GG对密度图的黑色轮廓

R 设置alpha并删除GG对密度图的黑色轮廓,r,ggplot2,ggally,R,Ggplot2,Ggally,考虑这个例子: data(tips, package = "reshape") library(GGally) pm <- ggpairs(tips, mapping = aes(color = sex), columns = c("total_bill", "time", "tip")) pm 但黑线仍然存在。多亏了@Henrik,这是使用自定义函数的解决方案 my_dens <- function(data, mapping, ...) { ggplot(data = da

考虑这个例子:

data(tips, package = "reshape")
library(GGally)
pm <- ggpairs(tips, mapping = aes(color = sex), columns = c("total_bill", "time", "tip"))
pm

但黑线仍然存在。

多亏了@Henrik,这是使用自定义函数的解决方案

my_dens <- function(data, mapping, ...) {
  ggplot(data = data, mapping=mapping) +
    geom_density(..., alpha = 0.7, color = NA) 
}

pm <- ggpairs(tips, mapping = aes(color = sex), columns = c("total_bill", "time", "tip"),
              diag = list(continuous = my_dens))
pm
my_dens试试这个:

pm <- ggpairs(tips, mapping = aes(color = sex, alpha = 0.7), columns = c("total_bill", "time", "tip"))

pm您检查过了吗?特别是,请使用“矩阵部分”/“自定义函数”或“打印矩阵子集”中的示例,并向我们展示您的尝试。您几乎做到了!只需将
color
设置为
NA
即可去除这些行<代码>我的名字@Henrik perfect,thanks@Henrik那个小插曲链接被破坏了,但是。。。我也知道答案,如果超过一岁,但它似乎不再有效。当我复制粘贴你的代码时,我得到的只是空白密度。试着用填充而不是颜色。@MLEN这个答案对我很有用——这就是方法
pm <- ggpairs(tips, mapping = aes(color = sex, alpha = 0.7), columns = c("total_bill", "time", "tip"))