Как распечатать.summarytools - с нашей оболочкой без view () - PullRequest
1 голос
/ 06 апреля 2019

Я пытаюсь создать таблицу (для включения в таблицу MSFT Word), подобную приведенной здесь:

https://github.com/dcomtois/summarytools

3 - descr (): описательная одномерная статистика

Однако

descr(iris, style = "rmarkdown")
style = "rmarkdown" is actually set as an st_options() - see below

Как указано в тексте, НЕ создает таблицу, которая следует в документе.

view(descr(iris, style = "rmarkdown"))

НЕ создает таблицу, которая следует вдокумент - как сделать следующее.

view(descr(iris), "browser")
print(descr(iris), "browser")

view(descr(iris), "viewer")
print(descr(iris), "viewer")

Следующее создает таблицу в форме для "Использование pander с knitr" (см .: http://rapporter.github.io/pander/knitr.html)

view(descr(iris), "pander")
print(descr(iris), "pander")

Рядом с Iмогу сказать (на данный момент), мне нужно изучить knitr (https://yihui.name/knitr/) - работать над этим.

С риском быть слишком многословным, вот мое "окружение":

R version 3.5.1 (2018-07-02) -- "Feather Spray"
Copyright (C) 2018 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64 (64-bit)

library(summarytools)
library(dplyr)
library(data.table)
library(pander)
library(knitr)
library(rmarkdown)

<<<<<< в начале источника </p>

st_options(bootstrap.css = FALSE, # Already part of the theme so no need for it
           plain.ascii = FALSE, # One of the essential settings
           style = "rmarkdown", # Idem.
           dfSummary.silent = TRUE, # Suppresses messages about temporary files
           footnote = NA, # Keeping the results minimalistic
           subtitle.emphasis = FALSE) # For the vignette theme, this gives much better results.

st_css()

library(knitr)
opts_chunk$set(comment = NA, prompt = FALSE, cache = FALSE, echo = TRUE, results = 'asis')

library(tables)

Ответы [ 2 ]

0 голосов
/ 12 апреля 2019

Чтобы иметь summarytools объекты, напечатанные из rmarkdown с knitr , у вас есть два варианта:

  1. используйте выходные данные в стиле уценки, установив style = "rmarkdown" & plain.ascii = FALSE, что вы правильно сделали, используя st_options(). Параметр чанка knitr results должен быть установлен в «asis»:

    ```{r, results='asis'}
    descr(iris, style = "rmarkdown", plain.ascii = FALSE)
    ```
    

    Поскольку вы установили параметры style и plain.ascii глобально, вы можете пропустить их при вызове функции.


  1. Вы также можете использовать HTML-рендеринг, который заставляет summarytools генерировать сам HTML-код, используя htmltools под капотом.

    ```{r, results='asis'}
    print(descr(iris), method = "render")
    ```
    

Также очень хорошая идея включить CSS в блок в верхней части документа со следующими параметрами блока:

```{r, results='asis', echo=FALSE}
st_css()
```

См. эту виньетку для получения дополнительной информации и примеров.

0 голосов
/ 06 апреля 2019

Вкладка, которая открывается с view(), на самом деле не предназначена для печати или выбора.Вы имеете в виду физически распечатанный на бумаге?Это не совсем то, для чего R.Попробуйте экспортировать свои данные в CSV-файл или что-то.

 write.csv(MyData, "My data file.csv")
...