在 R 中更改 plot_models object 的轴（更改 2 个逻辑回归模型的森林轴）

Question

使用sjTools中的 package sjTools 我创建了以下 plot 的两个逻辑回归模型，使用以下代码：

我基本上想做的是交换因变量和自变量。 也就是说，在y-axis上获取我的因变量，并将具有不同颜色的不同预测变量作为图例。 我曾尝试使用coord_flip()但这会产生一个错误，指出坐标系已经存在。

# Load packages and data
library(tidyverse)
library(sjPlot)

mydata <- read.csv("https://stats.idre.ucla.edu/stat/data/binary.csv")
str(mydata)

数据集如下所示：

> 'data.frame': 400 obs. of  4 variables:
>  $ admit: int  0 1 1 1 0 1 1 0 1 0 ...
>  $ gre  : int  380 660 800 640 520 760 560 400 540 700 ...
>  $ gpa  : num  3.61 3.67 4 3.19 2.93 3 2.98 3.08 3.39 3.92 ...
>  $ rank : Factor w/ 4 levels "1","2","3","4": 3 3 1 4 4 2 1 2 3 2 ..

然后我拟合模型并生成两个森林图：

# Convert rank to factor. 
mydata$rank <- factor(mydata$rank)

# Fit two models predicting university admission based on rank of high school and gpa or gre.
mylogit1 <- glm(admit ~ gre + rank, data = mydata, family = "binomial")
mylogit2 <- glm(admit ~ gpa + rank, data = mydata, family = "binomial")

# Produce forest plot
plot_models(mylogit1, mylogit2)

有什么帮助吗？ 谢谢！