在R markdown html文档的右上角插入徽标

您可以使用htmltools::img一些内联CSS进行定位.src可以直接采用路径,但是当图像不像图一样处理时,有时编织无法正确地将图像转换为URI,这反过来又导致它们无法渲染.self_contained: false在YAML中使用是一种快速解决方案,但使用knitr::image_uri手动转换图像并不困难:

---
title: "Title"
author: "Author"
output: html_document
---


```{r, echo=FALSE}
htmltools::img(src = knitr::image_uri(file.path(R.home("doc"), "html", "logo.jpg")), 
               alt = 'logo', 
               style = 'position:absolute; top:0; right:0; padding:10px;')
```

---

# 1. Header

Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Aenean commodo ligula eget dolor.

如果您使用的是经典html输出，则可接受的答案有效。如果像我一样，您也可以使用bookdown，则徽标需要出现在每页上。因此，如果有人找到了这个答案，但想在书本上添加徽标，我可以提出一个建议：

我们需要创建一个带有在头文件中调用的脚本的外部文件，幸运的是，我们可以直接在rmarkdown脚本中创建该文件。

我们还使用htmltools::img了允许不包含外部图像文件的图像。

这是我的rmarkdown脚本用作示例：

---
title: "Logo with Bookdown"
author: "Author"
date: '`r format(Sys.time(), "%d %B, %Y")`'
output:
  bookdown::gitbook:
    includes:
      in_header: header.html
---

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

```{r htmlTemplate, echo=FALSE}
# Create the external file
img <- htmltools::img(src = knitr::image_uri(file.path(R.home("doc"), "html", "logo.jpg")), 
               alt = 'logo', 
               style = 'position:absolute; top:50px; right:1%; padding:10px;z-index:200;')

htmlhead <- paste0('

')

readr::write_lines(htmlhead, path = "header.html")

```

# Page 1

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see .

When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

```{r cars}
summary(cars)
```

# Page 2

You can also embed plots, for example:

```{r pressure, echo=FALSE}
plot(pressure)
```

Note that the `echo = FALSE` parameter was added to the code chunk to prevent printing of the R code that generated the plot.