我正在使用 ggVennDiagram 創建維恩圖。我想手動設定類別的顏色。這是我正在嘗試的，但是圓圈邊界線的顏色沒有改變。
x <- list(A=1:5,B=2:7,C=3:6,D=4:9)
ggVennDiagram(x, label = "count", label_alpha = 0,
color = c("A" = "yellow","B" ="steelblue",'C' = 'red', 'D' = 'black') ,
set_color = c("A" = "yellow","B" ="steelblue", 'C' = 'red', 'D' = 'black'))
scale_fill_gradient(low = "#F4FAFE", high = "#4981BF")
知道如何將圓圈線的顏色與類別名稱匹配嗎？
謝謝
uj5u.com熱心網友回復：
從ggVennDiagram檔案看來，您似乎必須構建維恩圖而不是使用該ggVennDiagram函式。也許檔案示例中的這種改編足以讓您繼續作業......
更新以包含 OP 對百分比計數的評論。
library(ggplot2)
library(ggVennDiagram)
x <- list(A=1:5,B=2:7,C=3:6,D=4:9)
venn <- Venn(x)
data <- process_data(venn)
ggplot()
# 1. region count layer
geom_sf(aes(fill = count), data = venn_region(data))
# 2. set edge layer
geom_sf(aes(color = name), data = venn_setedge(data), show.legend = TRUE, size = 2)
# 3. set label layer
geom_sf_text(aes(label = name), data = venn_setlabel(data))
# 4. region label layer
geom_sf_label(aes(label = paste0(count, " (", scales::percent(count/sum(count), accuracy = 2), ")")),
data = venn_region(data),
size = 3)
scale_fill_gradient(low = "#F4FAFE", high = "#4981BF")
scale_color_manual(values = c("A" = "yellow","B" ="steelblue",'C' = 'red', 'D' = 'black'),
labels = c('D' = 'D = bdiv_human'))
theme_void()
由
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/373004.html
下一篇：取消嵌套多列