knitr的html输出中的标题

Question

编织以下Rmd文件时

```{r, fig.cap="mycaption"}
plot(0,0,axes=FALSE,xlab=NA,ylab=NA)

```

使用RStudio的"Knit HTML"按钮,然后标题不会出现在html输出文件中.实际上对应于该图的html源代码是:

<p><img src="data:image/png;base64,..." alt="mycaption"/></p> 

要查看标题,它应该是例如:

<p><img src="data:image/png;base64,..." alt="mycaption"/><p class="caption">mycaption</p></p> 

如何轻松获得带有可见字幕的html输出？

Answer 1

我通常只是results='asis'在块选项中使用并在块中包含原始html,将其包装进去cat()但是如同Yihui提到的那样你可以创建自己的钩子:

```{r}
knit_hooks$set(htmlcap = function(before, options, envir) {
  if(!before) {
    paste('<p class="caption">',options$htmlcap,"</p>",sep="")
    }
    })
```

```{r, htmlcap="Hello Dolly"}
library(ggplot2)
ggplot(diamonds,aes(price,carat)) + geom_point()
```