3

現在、Rstudio の R プレゼンテーション機能を使用してプレゼンテーションを行っています。

私はループしてグラフを1秒または2秒ごとにプロットするアルゴリズムを持っています。アルゴリズムは次の方法で呼び出すことができますRunAlgorithm()

RunAlgorithm<-function(){
    for(i in 1:10){
        x<-rnorm(1000)
        y<-runif(1000)
        plot(x,y)
        Sys.sleep(1)
    }
}

このアルゴリズムが実行されていることをプレゼンテーションで示したいと思います。しかし、ファイル（以下）で使用すると、個々のプロットのページ全体が取得され、次のプロットの直後に表示されます

ここに画像の説明を入力

TestFile.Rpres

    TestFile
========================================================
author: me
date: today

First Slide
========================================================
```{r echo = FALSE}
RunAlgorithm<-function(){
        for(i in 1:10){
            x<-rnorm(1000)
            y<-runif(1000)
            plot(x,y)
            Sys.sleep(1)
        }
}
RunAlgorithm()

```
Slide With Code
========================================================


Slide 2

私が望むのは、ボタンをクリックするか、このスライドをオンにしてブラウザでアニメーションを再生する方法です

4

1 に答える 1

1

RMarkdown ドキュメントとしての AR プレゼンテーション。たとえばのような動的なものではありません。光るアプリ。結果は、静的な html ファイルです。必要なのは、プレゼンテーションに含めることができるアニメーションを作成することです。これは、R Markdown とアニメーション パッケージの結合で部分的に回答されていますが、私はそれを機能させることができませんでした。だから私はこの例を見つけました。

したがって、あなたにとっては次のようになります

```{r setup,echo=FALSE}
library(knitr)
opts_knit$set(animation.fun = hook_scianimator)
```

<link rel="stylesheet" href="http://vis.supstat.com//assets/themes/dinky/css/scianimator.css">
<script src="https://ajax.googleapis.com/ajax/libs/jquery/1.7.1/jquery.min.js"></script>
<script src="http://vis.supstat.com/assets/themes/dinky/js/jquery.scianimator.min.js"></script>

    TestFile
========================================================
author: me
date: today

First Slide
========================================================
```{r echo = FALSE, fig.show='animate', interval=1}
RunAlgorithm<-function(){
        for(i in 1:10){
            x<-rnorm(1000)
            y<-runif(1000)
            plot(x,y)
        }
}
RunAlgorithm()
```
Slide With Code
========================================================


Slide 2

編集：

またopts_knit$set(animation.fun = hook_ffmpeg_html)、R-Studio プレビューでは機能しませんが、[詳細] -> [Web ページとして保存...] をクリックした後にのみ機能します。ffmpeg をインストールし、パスに含める必要があることに注意してください。

于 2016-12-08T11:01:02.577 に答える