使用R？创建MANOVA表以供发布？

我想知道是否有可能在R为MANOVA生成APA/可发布的表格

有各种各样的软件包和方法（如“sjPlot”、“stargazer”、“apaTables”）似乎可以处理不同形式的方差分析和回归。这可能只是以正确的方式为其中一种方法输入数据/模型/对象的一种情况，但尽管我已经尝试过了，但我不知道如何做

我已经对一系列物种的深度和年份进行了MANOVA，我想将总体结果（summary）和每个物种的结果（summary.aov）显示为一个表格或两个表格，任何一个都可以

这是我的数据的一个简化示例，我想将两个输出组成一个表

### data example 

depth.1 <- c(0, 2, 6, 10)

Depth <- c(replicate(40, depth.1))

Year <- c(replicate(40, 2016), replicate(40, 2017), replicate(40, 2018), replicate(40, 2019))

sp.1 <- runif(160, min = 0, max = 100) 

sp.2 <- runif(160, min = 0, max = 100)

sp.3 <- runif(160, min = 0, max = 100)

sp.4 <- runif(160, min = 0, max = 100)

sp.5 <- runif(160, min = 0, max = 100) 

data <- data.frame(Depth, Year, sp.1, sp.2, sp.3, sp.4, sp.5)

### MANOVA examples

data.man <- manova(cbind(sp.1, sp.2, sp.3, sp.4, sp.5) ~ Depth + Year, data = data) 

summary(data.man)

summary.aov(data.man)

####数据示例
深度1