问题描述
各位,请你评估一下我的代码并帮助我吗?
我需要反转我的箱线图的 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)