summarise()の結果を表形式で出力する

summarise(平均=round(mean(Score, na.rm = TRUE),1), 標準偏差=round(sd(Score, na.rm = TRUE),1)) %>% xtable() %>%…