экспортировать вывод group_by в R в talex - PullRequest
0 голосов
/ 16 апреля 2019

Я использовал оператор group_by для создания краткого обзора.Как я могу экспортировать их в латекс?

> ## DT & Gender/Campus/SE_track/programme
> group_by(starters, starters$SE_track) %>%
+   summarise(
+     count = n(),
+     mean = mean(Total_testscore, na.rm = TRUE),
+     sd = sd(Total_testscore, na.rm = TRUE))
# A tibble: 3 x 4
  `starters$SE_track` count  mean    sd
  <fct>               <int> <dbl> <dbl>
1 ASO                   207  9.75  2.85
2 KSO                    39  8.90  3.03
3 TSO                    40  8.98  2.83

1 Ответ

1 голос
/ 16 апреля 2019

Используя библиотеку xtable , вы получаете непосредственно вывод, который вы можете скопировать / вставить в свой латекс.

library(xtable)
data("tli")
xtable(tli[1:10,])

#\begin{table}[ht]
#\centering
#\begin{tabular}{rrlllr}
#\hline
#  & grade & sex & disadvg & ethnicty & tlimth \\ 
#\hline
#1 &   6 & M & YES & HISPANIC &  43 \\ 
#2 &   7 & M & NO & BLACK &  88 \\ 
#3 &   5 & F & YES & HISPANIC &  34 \\ 
#4 &   3 & M & YES & HISPANIC &  65 \\ 
#5 &   8 & M & YES & WHITE &  75 \\ 
#6 &   5 & M & NO & BLACK &  74 \\ 
#7 &   8 & F & YES & HISPANIC &  72 \\ 
#8 &   4 & M & YES & BLACK &  79 \\ 
#9 &   6 & M & NO & WHITE &  88 \\ 
#10 &   7 & M & YES & HISPANIC &  87 \\ 
#\hline
#\end{tabular}
#\end{table}

Конечно, вы можете сделать это и после group_by в трубе.Я использую здесь набор данных mtcars.

mtcars %>% 
   group_by(mpg) %>% 
   summarise(meanD= mean(disp), meanH=mean(hp)) %>% 
   xtable()
...