Kable теряет форматирование при обращении к элементу внешнего вида - PullRequest
Новая
       33

Kable теряет форматирование при обращении к элементу внешнего вида

0 голосов
/ 25 июня 2019

Я пытаюсь отправить отчет по электронной почте в RMarkdown через outlook.

Мой Rmd-файл имеет следующий вид: 


    ---
    title: ''
    output: html_document
    ---

    {r, echo=FALSE, warning=FALSE}
    library(kableExtra)
    options(knitr.kable.NA = '')
    kable(mtcars, "html") %>%
      kable_styling("striped") %>%
      row_spec(1,bold = TRUE, font_size = 15,background = "#9BBB59",color = "#ffffff")

В отображаемом файле первая строка сохраняет свой цветкак это должно.Следующим шагом является отправка электронного письма: 


    library(knitr)
    library(rmarkdown)


    render("C:/Users/luis.bento/OneDrive - Rio Bravo/Downloads/pergunta stackoverflow.Rmd",output_format = "html_document", output_file = "C:/Users/luis.bento/OneDrive - Rio Bravo/Downloads/test.html")


    guess_encoding("C:/Users/luis.bento/OneDrive - Rio Bravo/Downloads/test.html")
    eb <- read_lines("C:/Users/luis.bento/OneDrive - Rio Bravo/Downloads/test.html",locale =  locale(encoding = "UTF-8"))
    Encoding(eb) 
    eb[575]
    eb2 <- paste(eb, sep="", collapse="") 

    eb2 <- iconv(eb2, from = "UTF-8",to= "Latin1")

    library (RDCOMClient)

    olMailItem <- 0
    OutApp <- COMCreate("Outlook.Application")
    outMail <- OutApp$CreateItem(olMailItem)
    outMail[["subject"]] <- "Test"
    outMail[["BodyFormat"]] <- 2
    outMail[["HTMLbody"]] <- eb2
    outMail$Display()

В письме Outlook первая строка выделена жирным шрифтом, а размер шрифта - верным.Тем не менее, он больше не имеет зеленый фон и белый цвет.Почему эти два аргумента теряются?

Большое спасибо

...