Конвертировать kwi c в cvs или аналогичный формат в R?

Question

у меня есть фрейм данных kwi c для бумаги, которую я пишу, поэтому я должен скопировать и вставить результаты в Word, например, так есть ли решение для этого? Какой вариант экспорта у меня есть?

Answer 1

Лучший способ генерировать вывод из R в документ Word - это RMarkdown, где вывод из скрипта Rmd может быть записан непосредственно в документ Microsoft Word.

Поскольку можно создавать таблицы с помощью функции knitr::kable(), документ Word также может включать таблицы.

Вот пошаговое руководство по RStudio и сценарий Rmd, иллюстрирующий эту технику.

Сначала в RStudio создайте новый документ RMarkdown, выбрав значок нового документа под строкой меню.

В Затем появится всплывающее окно, создайте имя файла и сохраните файл.

Замените образец кода из документа RMarkdown следующим, чтобы загрузить * Пакеты 1022 * и knitr, создайте объект kwic() и напечатайте его в таблице с kable().

Создайте документ Word, выбрав кнопку knit в списке значков на панели текстового редактора RStudio, используя выбор Knit to Word.

По завершении RStudio открывает Word, и таблица вывода выглядит следующим образом.

[ 3

Можно использовать дополнительные функции kable() или kableExtra() для настройки внешнего вида таблицы вывода.

Кроме того, еще одним преимуществом этого подхода является то, что с помощью RMarkdown можно написать всю статью или статью, что делает анализ полностью воспроизводимым. В качестве примера полного анализа, выполненного в RMarkdown, можно просмотреть мой комментарий к ToothGrowth Analysis: Full Factorial ANOVA , который я опубликовал в 2015 году в поддержку курса Статистического вывода Университета Джона Хопкинса на Coursera.

Answer 2

объектов из kwic анализов просто data.frames с дополнительными атрибутами. Вы можете преобразовать их в обычный data.frame, а затем экспортировать их в слово. Я рекомендую flextable для этого, так как таблицы выглядят довольно красиво и редактируются непосредственно в слове:

library(quanteda)
library(flextable)

txt <- c(text1 = "this is an example sentence with",
         text2 = "this is another example with words in a string")

example_kwic <- kwic(txt, pattern = "example", window = 3, valuetype = "fixed")

pretty_table <- example_kwic %>% 
  as.data.frame() %>% 
  flextable() %>% 
  autofit()

pretty_table

Если у вас установлен Word, вы можете экспортировать это напрямую, насколько я понимаю:

print(pretty_table, preview = "docx")

Или вы просто используете приведенный выше фрагмент кода в документе RMarkdown, что я обычно и делаю.