Как создать статистический вывод в стиле APA в Sweave? - PullRequest
Новая
       8

Как создать статистический вывод в стиле APA в Sweave?

0 голосов
/ 31 января 2019

Я пытаюсь найти способ интегрировать статистические данные из пакета apa R в Sweave.

Мне нужно использовать пакет ez для моих статистических данных.анализ (как мне нужно типа 3 сумма квадратов).Это отлично работает с Rmarkdown, но у меня проблемы с форматом вывода в Sweave.

\documentclass{article}
\begin{document}
\SweaveOpts{concordance=TRUE}

\section*{Results}
<<echo=FALSE, results=hide>>=
library(knitr)
library(ez)
library(apa)

subject<- c(1:40)
reward<- rep(c("p", "s", "p", "s", "s", "p", "s", "p", "s", "p"), 4)
class<- rep(c("ST", "GT", "ST", "GT", "GT", "ST", "GT", "ST", "GT", "ST"), 4)
value<- runif(40, min=0, max=5)
df<- data.frame(subject, reward, class, value)
df$subject<- as.factor(df$subject)

analysis<- ezANOVA(data= df, dv=.(value), wid= .(subject),between = .(class), detailed= TRUE, type= 3)
apa.format<- apa(analysis, format= "text")
@

The results, \Sexpr{(apa.format[2,2])}, indicate...

\end{document}

Результат, который он должен получить:
F (1, 38) = 0,93, p = .341, ηp² = .02 IЯ пытался изменить формат с функции apa, и каждый вывод вызывает различную проблему:
* latex: производит textit (и это не делает курсив 'F' или 'p')
*markdown: делает '*' вместо создания курсива.
* text: не производит курсива или частичный символ Eta в квадрате.
Это может быть легко достигнуто в Rmarkdown, однако у меня было много других проблем.Предложения?Это может включать в себя: другой пакет для отчетов APA в Sweave, другой способ интеграции Latex и Rcode (и использования пакетов) или исправление к предыдущему выводу.Спасибо!

1 Ответ

0 голосов
/ 31 января 2019

Макрос \Sexpr выглядит как «съедающий» обратную косую черту, которую apa() вставляет в вывод, поэтому вам нужно удвоить их.Поэтому выберите формат "latex", а затем удвойте обратную косую черту: 

apa.format <- apa(analysis, format= "latex")
apa.format <- gsub("\\", "\\\\", as.matrix(apa.format), fixed = TRUE)

Это исправит все записи apa.format, чтобы они были совместимы с \Sexpr.as.matrix необходим, потому что apa.format - это тибль, и он не будет хорошо работать с gsub().(Я полагаю, вы могли бы сделать то же самое, используя mutate или что-то в этом роде, если вы знаете, что делаете с тибблами. Не знаю.)

Вывод

screenshot

...