按组添加颜色

Question

大家好！我尝试将boxplot和stripchart结合起来以表示一些数据，并尝试按组着色：

xfact yvar无响应0.0012无响应0.0002无响应0.0018无回应0.0004无回应0.0013无回应0.0004无回应0.0029无回应0.0016回应0.0177响应0.0335响应0.0118响应0.0309响应0.0314响应0.0135

那是我的代码：

boxplot(yvar~xfact, data = my.data, ylab= "CD8/GAPDH relative expression", 
names = c("Non-response n=14", "Response n=6"), outpch =NA)  
stripchart(yvar~xfact, data = my.data, vertical = TRUE, method = 
"overplot", pch = 21, col = "black", bg = c("green", "red"), add= TRUE) 

因此，我期望将绿色表示为无响应，而将红色表示为响应，相反，我会得到一些奇怪的输出：my output

所以您能帮我按组（无响应和无响应）进行着色吗？

Answer 1

[

这不是真正的解决方案，只是一种解决方法。

通过分组工作分配颜色（col），因此可以使用

boxplot(yvar~xfact, data = my.data, ylab= "CD8/GAPDH relative expression", 
    names = c("Non-response n=14", "Response n=6"), outpch =NA)  
stripchart(yvar~xfact, data = my.data, vertical = TRUE, 
    method = "overplot", pch = 16, col = c("green", "red"), add = T) 

如果您确实想获得带边框的圆形外观，则可以单独添加边框。

boxplot(yvar~xfact, data = my.data, ylab= "CD8/GAPDH relative expression", 
    names = c("Non-response n=14", "Response n=6"), outpch =NA)  
stripchart(yvar~xfact, data = my.data, vertical = TRUE, 
    method = "overplot", pch = 16, col = c("green", "red"), add = T) 
stripchart(yvar~xfact, data = my.data, vertical = TRUE, 
    method = "overplot", pch = 21, col="black", add = T)