Question

enter image description here

我正在使用ggtern包，试图创建三元图。我希望能够区分＆＃34; Growthzone＆＃34;和＆＃34; SpotPosition＆＃34;通过分配代表＆＃34; Growthzone＆＃34;用于点轮廓，以及表示＆＃34; SpotPosition＆＃34;的单独颜色;作为点填充。

我记得在ggplot2中我可以使用＆＃34; color＆＃34;对于大纲和＆＃34;填写＆＃34;填充，但在ggtern两个＆＃34;颜色＆＃34;并且＆＃34;填充＆＃34;似乎是指填充。

我可以使用不同的命令，还是解决此问题的方法？或者我的代码有问题？

＆＃13;

Type = ALL$Type
Origin=ALL$Mount
Growthzone=ALL$GZ
LABELS=ALL$Run
ClastID=ALL$Clast_ID
SpotPosition=ALL$in_growth_section


DATA <- data.frame(An = ALL$XAn, Ab = ALL$Xab, 
Or = ALL$Xor, label = sprintf("%s", LABELS))
show(DATA)


plot <- ggtern(data = DATA, 
               mapping = aes(An, Ab, Or)) +
theme_rgbg() +  
  geom_mask() + 
  geom_point(aes(colour=Growthzone, shape=ClastID, fill=SpotPosition))+

scale_colour_manual(values = c("black", "brown", "red", "orange", "yellow")) +
scale_fill_manual(values = c("orange", "blue", "green", "darkgreen", "magenta"))+
scale_shape_manual(values = c(2))+ 
 
  #tweak guides
  guides(shape= guide_legend(order   =1,
                             override.aes=list(size=5)),
         size = guide_legend(order   =2))


last_plot()

＆＃13;

enter image description here

如何在一种颜色中获得点轮廓并在ggtern（Rstudio）中指向另一种颜色？

0 个答案: