编辑2019-05-12

Question

在下面的ioslides演示文稿中，visNetwork图表对我来说是空白的，但是使用Slidy和reveal.js可以很好地呈现。我尝试过最新的CRAN和开发版htmlwidgets和rmarkdown。

---
title: "slides"
output: ioslides_presentation
---

## The HTML widget should render.

```{r}
library(visNetwork, quietly = TRUE)
visNetwork(data.frame(id = 1:3), data.frame(from = c(1,2), to = c(1,3)))
```

我宁愿坚持使用ioslides来获取当前的演示文稿，因为我需要一些不会暴露于reveal.js的自定义CSS。

> sessionInfo()
R version 3.4.0 (2017-04-21)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Red Hat Enterprise Linux Server release 6.9 (Santiago)

Matrix products: default
BLAS: /opt/R/R-3.4.0/lib64/R/lib/libRblas.so
LAPACK: /opt/R/R-3.4.0/lib64/R/lib/libRlapack.so

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C               LC_TIME=en_US.UTF-8       
 [4] LC_COLLATE=en_US.UTF-8     LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                  LC_ADDRESS=C              
[10] LC_TELEPHONE=C             LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] devtools_1.13.2

loaded via a namespace (and not attached):
 [1] Rcpp_0.12.11         revealjs_0.9         digest_0.6.12        withr_1.0.2         
 [5] rprojroot_1.2        R6_2.2.2             backports_1.1.0      git2r_0.18.0        
 [9] magrittr_1.5         evaluate_0.10        highr_0.6            httr_1.2.1          
[13] stringi_1.1.5        curl_2.6             rmarkdown_1.6.0.9001 tools_3.4.0         
[17] stringr_1.2.0        yaml_2.1.14          rsconnect_0.8        compiler_3.4.0      
[21] memoise_1.1.0        htmltools_0.3.6      knitr_1.16

编辑2019-05-12

@Esteban Moro，widgetframe绝对有帮助。仍然有待完成，至少在我的最后。下面，我展示了iotest.Rmd，它会生成一个空的iotest_files。有什么想法吗？

---
title: "slides"
output: ioslides_presentation
---

## The HTML widget should render.

```{r}
library(visNetwork, quietly = TRUE)
library(widgetframe)
frameWidget(visNetwork(data.frame(id = 1:3), data.frame(from = c(1,2), to = c(1,3))))
```

> sessionInfo()
R version 3.6.0 (2019-04-26)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Ubuntu 18.04.2 LTS

Matrix products: default
BLAS:   /home/landau/R/R-3.6.0/lib/libRblas.so
LAPACK: /home/landau/R/R-3.6.0/lib/libRlapack.so

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] widgetframe_0.3.1 htmlwidgets_1.3   visNetwork_2.0.6 

loaded via a namespace (and not attached):
 [1] compiler_3.6.0  magrittr_1.5    htmltools_0.3.6 tools_3.6.0    
 [5] yaml_2.2.0      Rcpp_1.0.1      rmarkdown_1.12  knitr_1.22     
 [9] jsonlite_1.6    xfun_0.6        digest_0.6.18   evaluate_0.13

编辑2019-05-13

我在YAML前端尝试了selfcontained: false，但小部件仍然没有出现。 selfcontained: true的结果相同。

---
title: "slides"
output:
  ioslides_presentation:
    selfcontained: false
---

## The HTML widget should render.

```{r}
library(visNetwork, quietly = TRUE)
library(widgetframe)
frameWidget(visNetwork(data.frame(id = 1:3), data.frame(from = c(1,2), to = c(1,3))))
```

Answer 1

对于滑坡，我使用R中的widgetframe库进行了解决

library(visNetwork, quietly = TRUE)
library(widgetframe)
frameWidget(visNetwork(data.frame(id = 1:3), data.frame(from = c(1,2), to = c(1,3))))

编辑05-15-2019

这是一个对我有用的最小示例：

---
title: "slides"
output: 
  ioslides_presentation:
    self_contained: FALSE
---

```{r setup, include=F}
knitr::opts_chunk$set(widgetframe_widgetsdir = 'widgets')
library(visNetwork, quietly = TRUE)
library(widgetframe)
```


## The HTML widget should render.
```{r}
frameWidget(visNetwork(data.frame(id = 1:3), 
                       data.frame(from = c(1,2), to = c(1,3))))
```

Answer 2

它似乎是由于ioslides中的（旧？）Hammer.js使用与vis.js中最近一次使用之间的不良互动造成的。

不知道如何解决这个问题......！

HTML小部件无法在ioslides演示文稿

编辑2019-05-12

编辑2019-05-13

2 个答案: