Как вы можете остановить повреждение символов стрелок при создании knitr :: kable () через файл .bat? - PullRequest
0 голосов
/ 19 января 2020

Я пытаюсь сгенерировать таблицу, используя knitr::kable и kableExtra с символами стрелки в выходной таблице. У меня это работает, когда я запускаю вручную через RStudio, но я хотел бы иметь возможность автоматизировать запуск скрипта через файл .bat. Когда я пытаюсь это сделать, стрелки становятся странными символами (см. Ссылку ниже). Кто-нибудь есть какие-либо идеи, что может быть причиной этого или как я мог заставить стрелки показывать правильно?

Спасибо легенды !!

output_showing_error

library(tidyverse)
library(kableExtra)
library(knitr)

data <- tibble::tribble(
  ~Subject, ~Fatigue,  ~Pain.Areas,
        1L,      "?",           NA,
        2L,      "↓",           NA,
        3L,      "?",           NA,
        4L,      "?",           NA,
        5L,      "?", "Lower back",
        6L,      "↑",           NA,
        7L,      "?",           NA,
        8L,      "?",           NA,
        9L,      "?",           NA,
       10L,      "↓",        "Hip",
       11L,      "?",           NA,
       12L,      "?",           NA,
       13L,      "?",           NA,
       14L,      "↑",           NA,
       15L,      "↓",           NA,
       16L,      "?",      "Groin",
       17L,      "?",           NA,
       18L,      "↑",           NA,
       19L,      "?",           NA,
       20L,      "↑",           NA
  )


data %>%
  mutate(Pain.Areas = ifelse(is.na(Pain.Areas), "", Pain.Areas)) %>%
  kable("html", align = "c", escape = F) %>%
  kable_styling(bootstrap_options = c("striped"), full_width = F)

.bat код файла:

cd "C:\Users\My.Name\OneDrive\R projects\Project.Directory" 
"C:\Program Files\R\R-3.6.1\bin\R.exe" CMD BATCH "C:\Users\My.Name\OneDrive\R projects\Project.Directory\script.R"
...