R标记中的折叠/隐藏图形

如果将此添加到.Rmd文件末尾

<script>
$( "input.hideshow" ).each( function ( index, button ) {
  button.value = 'Hide Output';
  $( button ).click( function () {
    var target = this.nextSibling ? this : this.parentNode;
    target = target.nextSibling.nextSibling.nextSibling.nextSibling;
    if ( target.style.display == 'block' || target.style.display == '' ) {
      target.style.display = 'none';
      this.value = 'Show Output';
    } else {
      target.style.display = 'block';
      this.value = 'Hide Output';
    }
  } );
} );
</script>

然后在您要进行切换的每个块之前执行以下操作：

<input type=button class=hideshow></input>

（改编自此处：https : //groups.google.com/forum/#!topic/knitr/d37E0mP3w6k）

注意：如果您显示代码，这将起作用-如果您隐藏代码（使用echo = FALSE，请更改）

target = target.nextSibling.nextSibling.nextSibling.nextSibling;

至

target = target.nextSibling.nextSibling;

注意2：如果要使用该code_folding选项，请更改

 target = target.nextSibling.nextSibling.nextSibling.nextSibling;

至

 target = target.nextSibling.nextSibling.nextSibling.nextSibling.nextSibling;