I didn't find the way to increase the font size of the numbers in the table or to eliminate the white rows/space in the table. Any help would be appreciated. Thanks.
pp <- ggsummarystats(
books,
x = "Book", y = "Percentage",
summaries = c("mean","median"),
ggfunc = ggboxplot)
pp$main.plot <- pp$main.plot + scale_y_continuous()+
ylab("")+ border() +xlab("")
pp$summary.plot <- pp$summary.plot + border()
pp
