如何通過特定鍵重新排序 ggplot2::facet_wrap 構面？

Question

從我的數據集中，我創建了多個方面。 現在這些方面實際上是按 chrl 的類型排序的。 我想按緯度重新排列構面。 例如，具有最低緯度值的構面將首先出現，然后是下一個，等等。

我的桌子：

位置 | 珊瑚類型 | 經度 | 緯度 | 年份 | 價值 |

鏈接到數據集——https://drive.google.com/open?id=1-z-iKk7_IvGKjhEblcPDlTA2II1GBFF4

我當前的構面截圖

我當前的代碼片段是：

require(ggplot2)
coralData<-read.csv("datasets.csv")
coralData$location<-as.factor(coralData$location)
coralData$value<-as.numeric(sub("%","",coralData$value))
coralData$year<-as.factor(coralData$year)
coralData$coralType<-as.factor(coralData$coralType)
ggplot(coralData, aes(year, value))+
  geom_point()+
  facet_wrap(coralType~location)+
  geom_smooth(aes(group = 1),
              method = "lm",
              color = "black",
              se = FALSE)

Answer 1

您應該使用dput()讓我們重現您的數據 - 沒有人會從谷歌驅動器鏈接下載數據來提供幫助。

正如@r2evans 所說，您可以使用因子重新排序 ggplot 圖形的大部分方面，包括方面：

從 mtcars 中，假設我們想在 cyl 中按不同級別拆分wt~mpg ，但按照 cyl 的降序重新排列構面。 相應地使用因子 function 和級別參數：

mtcars$cyl = factor(mtcars$cyl, levels=rev(unique(sort(mtcars$cyl))))
mtcars %>% ggplot(aes(x=wt, y=mpg)) + geom_point() + facet_grid(~cyl)