如何在箱线图中反转 x 轴

如何解决如何在箱线图中反转 x 轴

各位，请你评估一下我的代码并帮助我吗？

我需要反转我的箱线图的 X 轴，如您所见，x 轴是 Ma 中的年龄，R 绘制升序范围内的值，我需要它们的相反形式（即 65 -64,64 -63,63-62,62-61,61-60)。我用scale_y_reverse()试过，但是没有很好的效果

请帮帮我。

非常感谢。Box-plot

安装 Tidiverse install.packages("tidyverse")

开放图书馆

library(tidyverse)

使用 qplot

qplot(data =Filogen,x = Filogen$EDAD_1,y = Filogen$AREA_SUR,fill = Filogen$EDAD_1,geom = "Boxplot",ylab = 'Área (km²)',xlab = 'Edad (Ma)')

解决方法

一个潜在的解决方案是使用 forcats package（tidyverse 的一部分）中的 fct_rev() 函数，例如，使用来自 palmerpenguins package 的示例数据集：

# Load libraries
library(tidyverse)
library(palmerpenguins)

# Create a minimal reproducible example
MRE <- penguins %>% 
  na.omit()

# Plot the penguins data
qplot(data = MRE,x = species,y = bill_length_mm,fill = species,geom =  "boxplot",ylab = 'Área (km²)',xlab = 'Edad (Ma)')

并且，使用 fct_rev()：

# Load libraries
library(tidyverse)
library(palmerpenguins)

# Create a minimal reproducible example
MRE <- penguins %>% 
  na.omit()

# Plot the penguins data
qplot(data = MRE,x = fct_rev(species),xlab = 'Edad (Ma)')

此解决方案依赖于“物种”作为一个因素。在您的数据集中，等效变量是“EDAD_1”。如果“EDAD_1”不是因子，则在绘制数据之前，将其更改为因子：

Filogen$EDAD_1 <- factor(Filogen$EDAD_1)