r - 如何更改马赛克图中解释变量和响应变量的顺序？

Question

我的工作。
我想要什么。
如何修改我的 R 代码，使解释变量（已捕获、未捕获）位于绘图的底部，响应变量（已捕获、未捕获）位于绘图的右侧？我的老师不接受我的马赛克图，因为：（1）我的 x 轴和 y 轴拉伸（2）解释变量应该在底部（3）响应变量应该在右边。我真的希望有人能帮助我。我一直在尝试 YT，但我找不到任何东西。我在下面附上了我的 R 代码。

提前致谢！

mosaictable <- matrix (c (3, 9, 22, 21), byrow = T, ncol = 2)
rownames (mosaictable) = c ("White", "Blue ")
colnames (mosaictable) = c ("Captured", "Not Captured")
mosaicplot  ((mosaictable), sub = "Pigeon Color", ylab = "Relative frequency", 
            col = c ("firebrick", "goldenrod1"), font = 2, main = "Mosaic Plot of Pigeon Color and Their Capture Rate"
            
            )
axis (1)
axis (4)