Изменить цвет стрелки на графике ggtern?

Question

#Load the data
df <- read.table(file = "~/Desktop/PPS-data.txt", header = T)

#Create the plot and store
plot <- ggtern(data = df, aes(x = Xyp, y = XO, z = XY)) + 
               geom_point(aes(fill = Root),
                          size = 4, 
                          shape = 21, 
                          color = "black") + 
               ggtitle("PPS 3-State Model") + 
               labs(fill = "Root States") + 
               theme_tern_rgbw() + 
               theme(legend.position      = c(0,1), 
                     legend.justification = c(0, 1))

#Render
plot

Как изменить цвет стрелок и осей, чтобы они соответствовали цвету точек?

Я изучил структуру объектов ggtern, но не могу найти правильный синтаксис.