自定义蜂巢图

debugcn 发表于 Dev

西尔维亚·罗德里格斯（Sylvia Rodriguez）

我beeswarm在R中使用该程序包，在自定义单个数据点时遇到一些问题。我正在使用以下数据和代码。

 library(beeswarm)
 df <- data.frame(x = c(LETTERS), y = "1", 
 z = c(rnorm(26, 11, 4)))
 beeswarm(z ~ y, data = df,
     pwcol = c(1, rep(2, 25)), pwpch = c(1, rep(2, 25)), corral = "wrap", method = "center", 
     xlab = "", ylab = "variable", las=1
     )

我想对此进行更改，以便：

单个黑色圆圈变为带有红色填充的黑色菱形。
所有红色三角形数据点都变成深灰色圆圈，没有填充（打开）。

有人可以帮忙吗？谢谢。

jared_mamrot

您快要准备好了，您只需要进行一些小改动：

library(beeswarm)
df <- data.frame(x = c(LETTERS), y = "1", 
                 z = c(rnorm(26, 11, 4)))
beeswarm(z ~ y, data = df,
         pwcol = c("black", rep("grey15", 25)),
         pwpch = c(23, rep(1, 25)),
         pwbg = c("red", rep("transparent", 25)),
         corral = "wrap", method = "center", 
         xlab = "", ylab = "variable",
         las=1
)

本文收集自互联网，转载请注明来源。

如有侵权，请联系[email protected] 删除。