6

表示目的で、出力されたプロットを<div>コンテナーにラップする必要がある状況があります。

最も基本的なレベルでは、これが私がやりたいことです。

```{r fig.width=7, fig.height=6,results='asis',echo=FALSE}
cat('<div>')
plot(cars)
cat('</div>')
```

ただし、出力ドキュメントは次のようになります。

![plot of chunk unnamed-chunk-2](figure/unnamed-chunk-2.png)

出力を「ラップ」する必要がある場合の回避策はありますか?

同じ動作は、プロットをラップしているときにのみ発生するようです。それ以外の場合は、閉じたタグを含めると期待どおりに機能します。

```{r fig.width=7, fig.height=6,results='asis',echo=FALSE}
cat('<div>')
cat('</div>')
plot(cars)
cat('<h1>Hello</h1>')
``` 

それでも、画像をラップすると壊れてしまうようです。また、この動作を止めること<img><p>可能ですか?

4

1 に答える 1

6

ここにそれを行う1つの方法があります。

  1. まず、チャンク出力をタグ内にラップするためのチャンク フックを作成します。
  2. wrap = div内部でラップするチャンク オプションとして渡しますdiv
  3. プロット出力用の html を出力するout.extra = ""ようにだますように設定します。マークダウンはtag.s内で解析されるため、これは tag にknitrのみ必要であり、 には必要ないことに注意してください。divspanspan

終わり!

これはRmd、md、およびhtmlファイルの要点であり、ここにhtmlプレビューがあります

## knitr Chunk Hook to Wrap

```{r setup, echo = F}
knit_hooks$set(wrap = function(before, options, envir){
  if (before){
    paste0('<', options$wrap, '>')
  } else {
    paste0('</', options$wrap, '>')
  }
})
```


```{r comment = NA, echo = F, wrap = 'div', out.extra=""}
plot(mtcars$mpg, mtcars$wt)
```
于 2013-03-12T23:59:59.437 に答える