如何在构面网格中对两个离散变量进行排序？

Question

我希望能够根据STP_name的{​​{1}}，NetSurvival（伦敦/东南）以及5的面从此输出中对这些方面进行排序或1年生存统计数据（STP_region），因此名称需要出现两次，因为STP名称（根据它们是否在伦敦/东南部来定义）需要单独订购。

Years

数据示例：

require(Cairo)
CairoWin()
Bladdersamplegraph <- bladdersample %>% 
  ggplot(aes(x=fct_reorder(`STP_name`, NetSurvival),  y=NetSurvival)) +
  geom_point(size=2.5, alpha = 0.75, colour="grey") + 
  facet_grid(STP_region~Years, scales = "free", space = "free", labeller =label_both) +
  labs(x="STP", y="Net Survival Percentage") +
  theme(text=element_text(family="Segoe UI"),
        axis.text.x = element_text(size=16),
        axis.title.x = element_text(size = 20),
        strip.text.x = element_text(size = 20),
        axis.text.y = element_text(size=12),
        axis.title.y = element_text(size = 20),
        strip.text.y = element_text(size = 20),
        plot.title = element_text(face="bold", size=30),
        legend.title = element_blank()) +
  scale_y_reverse(labels = function(x) paste0(x, "%"), breaks=seq(90,40,-2.5)) +
  coord_flip() 
plot(Bladdersamplegraph)