library(xtable) N <- 10 groups <- rep(c("A","B","C"), each=10) DV <- c(rnorm(100,10,15), # means for group A rnorm(100,10,15), # means for group B rnorm(100,20,15) # means for group C ) sim_df<-data.f...library(xtable) N <- 10 groups <- rep(c("A","B","C"), each=10) DV <- c(rnorm(100,10,15), # means for group A rnorm(100,10,15), # means for group B rnorm(100,20,15) # means for group C ) sim_df<-data.frame(groups,DV) aov_results <- summary(aov(DV~groups, sim_df)) knitr::kable(xtable(aov_results))