Указание цвета в выводе HTML и PDF

Question

Ответ Николаса Гамильтона определяет, как использовать цветной текст в PDF и вывод HTML из Markdown, используя выражение R.

Если я создаю документ RMarkdown, я не получаю радости, предупреждающее сообщение

Ошибка в colFmt («МОЙ КРАСНЫЙ ТЕКСТ», «красный»): объект «opts_knit» не найден Вызовы: ... inline_exec -> hook_eval -> withVisible -> eval -> eval -> colFmt Исполнение остановлено

Чего мне не хватает?

Скопируйте и вставьте RMarkdown ниже:

---
title: "test colour"
author: "mbn"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

## R Markdown

This is an R Markdown document. 

```{r cars}
colFmt = function(x,color){
  outputFormat = opts_knit$get("rmarkdown.pandoc.to")
  if(outputFormat == 'latex')
    paste("\\textcolor{",color,"}{",x,"}",sep="")
  else if(outputFormat == 'html')
    paste("<font color='",color,"'>",x,"</font>",sep="")
  else
    x
}
```

## Test colour now

`r colFmt("MY RED TEXT",'red')`

Answer 1

Измените opts_knit$get на knitr::opts_knit$get, и ваш код должен работать.

См. https://stat.ethz.ch/R-manual/R-devel/library/base/html/ns-dblcolon.html

Answer 2

Вот пример кода rmarkdown, который самодостаточен и работает и использует шестнадцатеричные идентификаторы цвета для обеспечения согласованных цветов в pdf и html. Благодаря вкладу Кэндзи за указание мне нужна библиотека knitr.

---
title: "test colour"
author: "mbn"
output: html_document
#output: pdf_document
header-includes:
  \usepackage[usenames,dvipsnames]{xcolor}
---

```{r setup, include=FALSE}
library(knitr)
opts_chunk$set(echo = TRUE)

```

## R Markdown

This is an R Markdown document. 

```{r cars}
colFmt = function(x,color){
  outputFormat = opts_knit$get("rmarkdown.pandoc.to")
  if(outputFormat == 'latex')
    paste("\\textcolor[HTML]{",color,"}{",x,"}",sep="")
  else if(outputFormat == 'html')
    paste("<font color='",color,"'>",x,"</font>",sep="")
  else
    x
}
```

## Test colour now

`r colFmt("My colored text favorite green latex/pdf and html",'7ac143')`