Представить результаты нескольких моделей, созданных с использованием

 функции, вместе в красиво отформатированной таблице. Эта таблица будет сгенерирована в файле .Rmd и выведена в документ PDF.lm()Предложенное решение

В

Воспроизводимые исследования с R и RStudioесть пример использования Функция для отображения нескольких моделей бок о бок. Эта книга содержит следующий код (стр. 173-174):apsrtable()Код

где модели

\begi,n{table}
    \caption{Example Nested Estimates Table with \emph{aprstable}}
    \label{BasicApsrTableExample}
        \begin{center}
<<results= asis , echo=FALSE>>=
# Load apsrtable package
library(apsrtable)
# Create nested regression model table
apsrtable(M1, M2, M3, M4, M5, Sweave = TRUE,
      stars = "default")
@
       \end{center}
\end{table}

 создаются кусками, используяM1 ... M5ВыходM2 <- lm(Examination ~ Education + Agriculture, data = swiss).

Ниже приведен скриншот результатов, как сообщается в книге. Именно эту таблицу я хочу создать в своем файле .Rmd и вывести в документ PDF.

вопросы

Попытка 1

 Когда я пытаюсь использовать этот кодвнутри кусок кода - как показано ниже - и вывод в PDF, я получаю сообщение об ошибке:Попытка 2Error: $ operator is invalid for atomic vectors

```{r}
t.model2 = xtable(model2,label = NULL)
t.model3 = xtable(model3,label = NULL)

library(apsrtable)

apsrtable(t.model2, t.model3, Sweave = TRUE, stars = "default")
```

 Когда я использую приведенный выше кодвне кусок кода, файл .Rmd выводит в PDF, но отображает следующее:Вопросы

Мои вопросы

Почему эти попытки терпят неудачу?

Как правильно использовать функция внутри .Rmd?apsrtableБудет ли этот метод работать для вывода этого .Rmd файла в PDF?Связанные вопросы переполнения стека

Инструменты для изготовления латексных столов в R

Включить вывод apsrtable (или stargazer) в Rmd-файл

Объединение нескольких таблиц регрессии в одну для использования в xtable с Sweave в R

Вам нужно позаботиться о следующих двух вещах: