ggplot plot summary table

 

DATA=RSUM$ROWSUM
FDATA<-data.frame(round(unclass(summary(DATA)),2), check.names = FALSE, stringsAsFactors = FALSE)
colnames(FDATA)<-"values"
grid.arrange(tableGrob(FDATA))