我想把组织做成不同的 colored颜色 和形状,比如心脏是紫色的正方形,肝脏是绿色的三角形,肺是橙色的钻石.此外,我也喜欢让治疗是不同的形状,特别是封闭或开放的形状.因此,控制心将是一个开放的紫色正方形.我有困难,因为我希望不同的形状参数适用于两个不同的变量.下面是可重现的代码以实现下面的散点图.如有任何指导,将不胜感激!
library(tidyverse)
ex <- data.frame(tissue=rep(c('lung','heart', 'liver'),each=10),
treatment=rep(rep(c('smoking','control'),5),each=3),
value1=rnorm(30) + rep(c(3,1,4,2,5),each=6),
value2=rnorm(30) + rep(c(30,11,43,21,15), each = 6))
ggplot(ex, aes(value1, value2)) +
geom_point(size = 2, aes(col = tissue, shape = treatment))+
scale_color_manual(values = c("#7030a0", "#548235", "#c55a11")) +
scale_shape_manual(values = c(21, 19))